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1.0 ABSTRACT 


This diagnostic serves as a replacement to DEKBGA, the 11/70 Power 

Fail Test. It provides all of the coverage and features of the 

previous power fail test along with the added features of diagnostic 

ne rt 2 of multiprocessor systems using the K811-CM Processor and the 
interface. 


The test is divided into two sections, Section 1 and Section 2. 
Section 1 completely replaces DEKBGA and basically serves as a test of 
CPU logic validity during a power Fail sequence. This section can be 
run on a standard urmodified 11/70 processor as it utilizes no 
multiprocessor resources. Section 2 is enabled by enabling console 
switch 6. This section will be executed directly after section 1. 
This section provides testing for proper functionality of the 
Interprocessor Interrupt and Sanity Timer (IIST) powerfail procedures, 
and ogee 3 system activity during a loss of power on the system or one 
of its subsystems. 


This diagnostic also supports the use of the UNIBUS Exerciser (UBE) to 
perform simulated powerfail sequences during the execution of Section 


2.0 REQUIREMENTS 
2.1 Equipment 
This test is designed to support three types of systems. 


Standard single processor 11/70 systems with the KkB-11B/C 
processor. 


Standard single processor 11/74 systems with the KB-11(M 
processor 


Standard multiprocessor 11/74 systems with MKA11 memory usin 
KB-11(M central processors connected with an _ IIS 
interprocessor interface. 


At least one console terminal is required for message and error 
reporting on any of the above specified systems. 


Optional equipment includes Unibus Exercisers for all system types and 
mass storage devices (RPO 5/6, massbus Exercisor) for type 3 systems. 


2.2 Storage 


The Power Fail test runs in 12K words of memory. The first 4K is used 
for stack areas _ and common access data. The second 4K contains the 
program itself. The only data elements that reside here are type and 
error messages, and execution flow and control variables that are used 
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(modified) when the processor runs in multiprocessor mode. The next 
4k ‘s, used as buffer space for massbus transfers that occur during 
test . 


2.3 Preliminary Procedures. 


ALL standard 11/70-74 CPU diagnostics should first be run to insure 
proper operation under a secure power condition. Specifically, the 
11ST diagnostic and Unibus Exerciser diagnostics should be run, f 
massbus devices are to be used for test 21 it might be wise to insure 
that the devices are in proper hartge order. The power fail 
diagnostic may use all massbus drives and memory boxes accessible by 
the CPUs pore serene he in this diagnostic. Therefore, it is important 
to switch offline to participating CPUs all data storage equipment 
that the operator does not want corrupted by this diagnostic. Before 
starting the power-fail diagnostic the operator should also be sure 
that the CPU power-up action switches (on the IIST front panel) are 
all “Run or Halt’’ for participating CPUs, the IIST enable switches are 
“fonline’’, and the IIST configuration switches are all at the same 
i oe for all participating CPUs. All participating memory boxes 
should be online to all participating CPUs. 


The operator of this test should be familiar with the MKA11 and IIST 
boot/control panel. 


3.0 LOADING PROCEDURE 


This diagnostic can be loaded within the standard XXDP loading 
procedure. Note that if this diagnostic is being run as part of a 
chain that it must be the last element in that chain. 


This diagnostic is loadable under the APT system but can only be = run 
under AP; if Urniprocessor mode with the UBE enabled. 


4.0 STARTING PROCEDURE 
4.1 Starting Aadress 


ire arere ing address for this diagnostic is 200. The restart address 
is ‘ 
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4.2 Control Switch Settings 
The switch settings are as follows (when set to 1): 


SW15 = Halt on Error 

Sw14 = ‘see on test (Section 1 only) 

Sw08 - E le System Power Fail Test ‘Test 25) 

SWO7 - Disable Section 1 Tests (Multiprocessor mode only) 


SwW6 Sw5 

0 0 Uniprocessor mode, manual powerfail. 
(this mode can be used a a replacement for 
previous powerfail diagnostic) 


0 1 Uniprocessor mode, automatic (UBE) powerfail 
(uniprocessor mode that should be used under APT) 

1 0 Multiprocessor mode, manual powerfail. Both 
sections (1 and 2) are executed. : 

1 1 Multiprocessor mode, automatic (UBE) powerfail. 


Only Section 1 will use the UBE. Each CPU 
must have a UBE. 


Note that for the multiprocessor modes (SW6 enabled) the IIST *'system’’ 


ID of each CPU pede 3 ey | in the test should be specified by 
setting the appropriate bit in Switches 0-3 in the switch register. 
For example, if all processors in a 4 processor system are to be 
tested then switches 0-3 should be enabled. If only CPU's 0 and 2 are 
to participate then only switches 0 and 2 should be enabled. 


The switches are defined by the master CPU only (in multiprocessor 
mode), where the master is the (CPU that. starts or restarts the 
program. Each slave CPU uses the switch definitions of the master. 


The Program will not interpret changes to the switches in 


multiprocessor mode while the program is running. The program must be 
restarted. 


4.3 Restarting Procedures 
The restart address for this diagnostic is 220. A restart should be 


considered a completely mew session therefore be sure the proper 
switches are enabled for the features that you want. 


4.4 Program And/Or Operator Action 


SEQ 0005 


NOTE 


Be sure to isclate the CPU's that are to 
participate in the powerfail test from 
other CPU's that are to remain 

ss functional. Participating CPU's should 
have the IIST configuration switches 
found on the [IST panel switched to the 
SYSTEM B position (if this is_ the 
default position for the installation 
ao SYSTEM A position could be 
used). 


5.0 OPERATING PROCEDURES 
5.1 Modes Of Operation 


This Gg agnostic is designed to run in four basic modes specified by 
the selection of bits 5 & 6 in the console switch register. It should 
be noted that if a multiprocessor mode is chosen (SW6 enabled) that 
the first CPU started will become the ‘master’’ and successively start 
the remaining participating CPU's, the ‘‘Slaves’’. 


5.2 Common Procedures 


Load address 200 and then enable the switches for the test tode_ that 
is desired. Remember to enable the appropriate CPU mask bit if you 
are running a multiprocessor mode. When this has been done _ insure 
that all slaves are powered up arid have their halt switches in the 
“fenable’’ state if MP mode is to be used. Hit start - the program name 
will be typed followed by the mode the diagnostic is running in 
(uniprocessor or multi-processor) followed by the contents of the 
switch register and whether the Unibus Exerciser will be used to 
simulate power fails. 


5.3 Notes And Warnings 


1. Power failures in section 1 are only allowed when expected. 
Therefore in manual mode do not remove the power until the 
test number appears in the display register. 


2. Power failures are not allowed during the execution of the 
End of Pass (EOP) routines. Note that the number displayed 
during the End of Pass is the Pass number NOT the test 


3. when running the diagnostic in uniprocessor mode on a atingte 
CPU that 1s_ part of a multiprocessor system make sure that 
the [IST ge’ ghey, switch for the respecitve CPU is_ in 
the STAND ALONE position and the JIST ENABLE switch is in the 
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OFF LINE position. 


4. When running in multiprocessor mode insure that the subsystem 
under test is isolated from any system that is still running 
ty switching the CPU's under test to an alternate postion 
with the Yist CONFIGURATION swtiches. For exampie, if the 
default system normally runs on the ‘SYSTEM A’ postion, 
switch the subsystem under test to the ‘‘SYSTEM B’' position. 


5.4 Uniprocessor Mode, No UBE 


The diagnostic will instruct you to ‘‘interrupt the power after the 
test number appears on the display’’. Interrupt the power only at this 
time. If the test is successful then the next test number” should 
appear in the display. When the End of Pass is reached the Pass count 
will be typed. There are no error reports in Section 1 (except for 
unexpected traps to 4 and 114.) Normally, an error results ina 
processor halt. 


5.5 Uniprocessor Mode, With UBE 


In this mode the UBE is used to perform the power Fail procedure. No 
‘‘interrupt the power...'' message is typed before the UBE takes action. 
The test number and pass number however do appear in the hing 
register. An EOP message is typed equivalent to that of Section 5.4. 
Note that in this mode only the CPU logic involved in the power-fail 
sequence is. tested. Failures that may occur because of problems in 
the Power system will go undetected. 


5.6 Multiprocessor Mode, No UBE 


In multiprocessor mode the CPU that is initially started becomes the 
“MASTER” CPU. What this means is that all error messages oe syennrs 
will appear on this CPU's console. This CPU is also responsible for 
startup of ‘‘slave’’ CPU's. Slave CPU's are the remaining CPU's that 
are scheduled to participate_in the test by their appropriate bit 
being set in switches 0-3 of the master CPU's SWR. When start is 
depressed and multi-processor mode is specified the program name, test 
mode, and switch register setting will be typed upon the master CPU 
console. The remaining CPU's will then be booted and then interrupted 
through the masters IIST. This will be followed by an ‘‘interrupt the 
power...'’ message. 


The ID of the processor responsible for typeouts and error messages 
will precede the message: 


0> 
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n> 


Run each processor through section 1 one at a_ time. After 
power-failing the Last test in Section 1 (Test 16) on one CPU go on to 
the next CPU, etc. After the last test on the last CPU has been 
en in Section 1, the operator will receive instructions at 
console. 


Whereas there are no prompts printed at the console in Section 1, all 
power fails in Section 2 must be done in exact agreement with the 
typed-out instructions. 


Section 2 prompts the operator to remove the power from a particular 
element of the system. If the expected results occur then the next 
element is tried. When all relevant elements nave been tried then the 
diagnostic precedes to the next test. Section 2 contains tests 17 


through 25. 


5.7 Multiprocessor Mode, With UBE 


This mode is the same as ‘multiprocessor mode, no UBE"’ except that 
Section 7 will be done without manual intervention. AL CPUs that are 
to participate must have a UBE module. 


6.0 ERRORS AND ERROR REPORTING 


Error reports are always 3 ag out on the console of the CPU that was 
first started. This is the ‘master’’ CPU in mul ¢ iprycessor mode. All 
error messages are preceded by a tag as follows ‘n>" where n's_ the 
IIST self-ID of the CPU encountering the error. Typing in 
multiprocessor mode is always done by the master. If the master is 
without power when typing is required, the messages will be queued and 
printed when power has been restored. 


1 
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DESCRIPTIONS 

that are found in section | are simple power fail tests that 
that the proper machine states are ertered on power fail and 
The test names are self=- explanatory. 


Section 1 


SimpLe Down/Up test (Kernal node) 

Program Voltility Test sf q 
Verify that the memory bank containing the program will not 
be corrupted by CPU power fails. 

Simple Down/Up test (Supervisor mode) 

Simple Down/Up Test (User mode) 

Power fail with odd address 

Power Fail in the Red Zone 

Power Fail with memory timeout (kernai) 

Power Fail in the yellow zone. 

Power Fail with resets. 

Power Fail with odd address (Supervisor). 

Power Fail with Timeout (Supervisor) 

Power Fail with odd address (User) 

Power Fail with timeout (User) 


Memory Management Abort Test 


Section 2 


After 2'l CPUs reach the beginning of Section 2, each CPU 
sizes fur RPO4/5/6 massbus devices. If no devices are found 
the following message is printed: 


No Massbus Device Available On CPU #n 


If the only massbus device found has its PGM bit set, the 
following mesSage is printed: 


Warning: Drive #n 
On CPU @ri_ 
Is accessible over Ports A and B 
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and wili be used later in this diagnostic. 
Check "BRK'' & 'DCF’' FLAGS during power fail. Insure that the 
IIST's of functioning CPU's receive BRK & DCF signals 
corresponding to the CPU that performed a Power Fail. 


The operator will be prompted with messages of the following 
type: 


Power Fail CPU #n 
Afte:: restoring power, each of the other CPUs should report: 


CPU Interrupt As Expected 


Check power fail during high memory activity. Insure that 
power down sequences can be performed by a CPU while other 
CPU's are contending for the memory bus. 


The operator will be prompted with messages of the following 
type: 


Power Fail CPU #n 


There is no report from the other CPUs after restoring power. 


Check power fail during massbus transfer. Insure that power 
down sequences can performed by a CPU while other CPU's 
are performing massbus read operations. Also verify that the 
read operations don't experience any loss of data due to the 
power condition of an uninvolved CPU. 


The operator will be prompted with messages of the following 
type: 


Power Fail CPU #n 
If there are no massbus devices for the other (CPUs to use, 
then the following messages are printed instead of the above 
message: 


No Massbus Device Available On CPU #n Proceeding 
To Next CPU. 


There is no report from the other CPUs after restoring power. 
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Insure that a loss of AC power on a MKA11_ semiconductor 
memory box does not cause a power fail sequence to occur on 
any processor that has a disabled part to that box. 


The operator will be prompted with messages of the type: 
Get Set To Power Fail Mem Box #n 
2ut battery backup on all memory boxes 
wait ae memory ports offline only cn mem box to be power 
aile 
Make all CPU power-up switches ‘Run or Halt'' 
Now Power Fail The Mem Box 
Restore power 5 seconds after power fail 
Restore ali memory ports online 
Then type any character at the master console 
No CPU should report a power fail 
The master should report ‘Ok"’. 
Check AC power fail on memory box. Insure that a loss of AC 
power on a MKA11 semiconductor a box causes a power fail 
a 


sequence to occur on any processor that has an enabled port 
to that box. 


The operator will be prompted with message of the type: 

Get Set To Power Fail Mem Box #n 
Put battery backup on all memory boxes 
Make all memory ports online 
Make all CPU power-up switches ‘Run or Halt’’ 
Now power fail the mem box 
Restore power 5 seconds after power fail then type any 
character at the master console. Each CPU should report a 
power failure. 
Each CPU should report the following message: 

Power Failure On CPU As Expected 
Check DC Power Loss on a memory box. Insure that the slave 
CPU(s) specified aa the TIST Boot/control panel perform 
a boot operation when AC & DC power are restored to the 
memory box. 
The operator will be prompted with message of the type: 


Get Set To Power Fail Mem Box #n 


SEQ 0011 
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Disable battery backup on mem box to be power-failed. Put 
all slave CPU mem ports online. Make master CPU mem port 
offline only on box to be power-failed. Make all CPU 
power-up switches ‘RUN OR Boot’’. 


Now Power Fail The Mem Box 


Restore power 5 seconds after power fail 

Restore all mem ports online : € 
Restore all CPU power-up switches to ‘Run or Halt 
Then type ay character at the master console 

Each slave should report an interrupt 


Each slave CPU should report the following message: 
CPU Interrupt As Expected 
25. Check system recovery on power fail. Insure that a_ total 
momentary loss of AC power on a system level is recoverable 
without operator intervention. 
The operator will be prompted with the following message: 
Get Set to Power Fail Entire System... 
Put battery backup on all mem boxes 
Make all memory ports online 
Make all CPU power-up switches ‘Run or Halt*’ 


Now Power Fail the Entire System ; 
Restore power 5 seconds after power fail 


Each CPU should report the following: 


8.0 MISCELLANEOUS 


Test 24 will not be done on the memory box with base address 0. 

Therefore, in order to fullY test all system elements the operator 
should restart this diagnostic a second time and switch the box with 

base address 0 with another box (using the thumbwheels to switch base 

addresses). The operator should also switch master CPUs on the 
restart. 
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Test 22 will be ds if there is only one MKA11 memory box. Power 
h Section 1 _— the UBE will not necessarily test power 
(it depends on when the 


Failing — 

fail during odd address trap, timeout, etc. 

UBE starts the power down Therefore, it is recommended to mariually 
power fail Section 1! 
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PDP=11/70,74 SYSTEM POWER FAIL 


! #PROGRAM BY JIM LACEY, JEFF WHITE, BILL SCHLITZKUS 


‘THIS PROGRAM WAS ASSEMBLED USING THE PDP=-11 MAINDEC SYSMAC 
: SPACKAGE (MAINDEC=71=DZQAC-C3), JAN 19, 1977. 
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MIS DIAGNOSTIC § DIVIDED INTO TWO SECTIONS: SECTION 1 TESTS THE 
IC ABILITY OF A PROCESSOR TO SUCCESSFULLY ENTER AND RECOVER 
TMIS SECTIGN REPLACES, IN FUNC- 
PREVIOUS POWER FAIL DIAGNOSTIC DEKBGA AND PROVIDES 
dui VAL end PIAGHOSTIC COVERAGE. THIS SECT Y THIS 
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PARTICIPATING PROCESSORS. SECTION 2 TEST 
PROCESSOR SYSTEM TO SUCCESSFULLY <r FROM A POWER FAILURE 
EITHER IN A SELECTIVE SUBSYSTEM (MEMORY BOX OR PROCESSOR) OR ON 
ey SYSTEM WIDE LEVEL DURING VARIOUS KINDS OF MEMORY AND 1/0 ACTIV- 


IN’ THE MULTIPROCESSOR MODE, ALL CPUS MUST ARRIVE AT Pr 

ENTRY POINT TO SECTION 2 BEFORE ANY CPU WILL BEGIN SECTION 2 
TESTING. IF SECTION 1 IS NOT SKIPPED AND THE UNIBUS EXCERCISER 
IS NOT BEING USED, THE OPERATOR MUST POWER FAIL EACH CPU 
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MANUALLY THRU THE 16 TESTS OF SECTION 1 TO GET THE CPU TO THE * 
ENTRY POINT OF SECTION 2. * 
BEFORE STARTING THE PROGRAM, BE SURE THAT THE CPU POWER-UP * 
ACTION SWITCHES (ON THE IIST FRONT PANEL) ARE ALL ® 
"RUN OF HALT’', THE IIST ENABLE SWITCHES ARE ONLINE, * 
* 

* 

* 

* 


nm 


THE IIST CONFIGURATION SWITCHES ARE EITHER ALL SYSTEM m0. R 1. 
AE a ah MEMORY BOXES SHOULD BE ONLINE TO ALL PART IC~ 
-* 
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: SWITCH REGISTER DEFINITIONS 


STHE SWITCHES ARE DEFINED BY THE MASTER CPU ONLY 

: WHERE THE MASTER IS THE CPU THAT STARTS OR RESTARTS 

; THE PROGRAM. EACH SLAVE CPU USES THE SWITCH DEFINITIONS 
: OF THE MASTER. 


“THE PROGRAM WILL NOT INTERPRET CHANGES TO THE 
SWITCHES IN MULTIPROCESSOR MODE WHILE THE PROGRAM IS RUNNING. THE 
;PROGRAM MUST BE RESTARTED. 


3 SW15=1 HALT ON ERROR 
3SW14=1 LOOP ON TEST (SECTION 1 ONLY) 
; SwO8=1 ENABLE SYSTEM POWER FAIL TEST (TEST 25) 
3SwO7=1 DISABLE SECTION 1 TESTS (MULTIPROCESSOR MODE ONLY) 
3 SWO6=1 ENABLE MULTIPROCESSOR MODE/SECTION 2 TESTS 
;SwO5=1 ENABLE UNIBUS EXERCISERS (SECTION 1 ONLY, EACH CPU MUST HAVE A UBE) 
;SwO3=1 TEST CPU #3 (IIST SELF ID), MULTIPROCESSOR MODE ONLY 
;SwO02=1 TEST CPU #2 “ 
:SwO1=1 TEST CPU #1 ae i 
; SWOO=1 #0 = 2 


TEST CPU 
-SBTTL BASIC DEFINITIONS 


;*INITIAL_ADDRESS OF THE _STACK POINTER 
STACK= 13776 RST ADDRESS OF THE STACK 


KERSTK= STACK «KERNEL STACK 

SUPSTK= STACK-200 ; ] SUPERVISOR STACK 

USESTK= STACK-300 >:USER STACK 

-EQUIV EMT,ERROR :3BASIC DEFINITION OF ERROR CALL 
“EQUIV I0T,SCOPE [BASIC DEFINITION OF SCOPE CALL 

PS= 177776 + PROCESSOR STATUS WORD 

.EQUIV PS,PSW 

STKLMT= 177774 ::STACK LIMIT REGISTER 

PIRQ= 177772 + PROGRAM INTERRUPT REQUEST REGISTER 
DSWR= 177570 ; HARDWARE SWITCH REGISTER 

DDISP= 177570 SHARDWARE DISPLAY REGISTER 

LKS= 177546 ‘LINE CLOCK (KW11=-L) STATUS REGISTER 
; MISCELLANEOUS DEF INIT IONS 

HT= 11 :CODE FOR HORIZONTAL TAB 

LF= 12 “CODE L LINE FEED 

(R= 15 >:CODE CARRIAGE RETUR 

CRLF= 200 +:CODE FOR CARRIAGE RETURN=L INE FEED 


; *GENERAL PURPOSE REGISTER DEF INITIONS 
RO= 20 ;:GENERAL REGISTER 


oz 


ee 
MA INDE C-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6-JUN=79 09:12 PAGE 4 


CEKBGB.P11 O5-JUN-79 09:14 BASIC DEFINITIONS SEQ 0018 
113 000001 R1= 41 ; GENERAL REGISTER 
114 000002 R2= 42 ; GENERAL REGISTER 
115 000003 R3= %3 ; GENERAL REGISTER 
116 000004 R4= AS ;;GENERAL REGISTER 
117 000005 R5= x5 ; GENERAL REGISTER 
118 000006 R6= x6 ; GENERAL REGISTER 
119 000007 R7= %7 ; GENERAL REGISTER 
120 EQUIV RO,R10 ; GENERAL REGISTER 
121 EQUIV R1,R11 : GENERAL REGISTER 
122 EQUIV R2,RI2 ; GENERAL REGISTER 
123 -EQUIV R3,R13 ; GENERAL REGISTER 
124 -EQUIV R4,R14 7 GENERAL REGISTER 
125 -EQUIV R5,R15 ; GENERAL REGISTER 
126 000006 SP= 26 ;;STACK POINTER 
127 -EQUIV SP,KSP ; KERNEL STACK POINTER 
128 -EQUIV SP,SSP ; SUPERVISOR STACK POINTER 
129 -EQUIV SP,USP ;;USER STACK POINTER 
ot 000007 PC= %7 3 ;PROGRAM COUNTER 
132 ;*PRIORITY LEVEL DEFINITIONS 
133 000000 = 0 ; PRIORITY LEVEL 0 
134 000040 PR1= 40 ;-PRIORITY LEVEL 1 
135 000100 PR2= 100 ;:PRIORITY LEVEL 2 
136 000140 PR3= 140 ;:PRIORITY LEVEL 3 
137 PR4= 200 ; PRIORITY LEVEL 4 
138 000240 PR5= 240 7;PRIORITY LEVEL 5 
139 0003006 PR6= 300 ;sPRIORITY LEVEL 6 
oe 000340 PR7= 340 7 ;PRIORITY LEVEL 7 
142 3*" "SWITCH REGISTER’’ SWITCH DEFINITIONS 
143 100000 SW15= 100000 
144 040000 SW14= 40000 
145 020000 SW13= 20000 
146 010000 ” SWi2= 10000 
147 004000 Sw11= 4000 
148 002000 Sw10= 2000 
149 091000 SwO9= 1000 
150 00 SwO8= 400 
151 000200 SswO7= 200 
152 000100 SwO6= 100 
153 000040 SwOS= 4 
154 000020 SwW04= 20 
155 000010 SwO3= 1 
156 000004 SWO2= 4 
157 000002 SWOl= 2 
158 000001 Swo0= 1 
159 EQUIV SWO9,SW9 
160 EQUIV SW08,SW8 
161 -EQUIV SW07,SW7 
162 -EQUIV SW06, 

163 EQUIV SW05,SW5 
1 EQUIV SwW04,SW4 
165 EQUIV SW03,SW3 
166 -EQUIV SwW02,SW2 
167 -EQUIV SWO1,SW1 


168 “EQUIV SWwOO.SWO 


oz 


MAINDEC-11-CEKBG-8 


CEKBGB.P11 


mee el a ad 3 od oo ot ed od od 8 


BLE BRAN LESBLRALRATSSISVEARANASSF § 


3 


Monon 
888s 


O5=JUN-79 09:14 


000002 
000001 


177752 


;*DATA 
BIT15= 


“EQUIV 
“EQUIV 


G | 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 5 


BASIC DEFINITIONS 


SEQ 0019 


BIT DEFINITIONS (BITOO TO BIT15) 
100000 


BITO9,BIT9 
B1T08,B1T8 
BITO7,BI1T7 
B1T06,BIT6 
B1T05,BIT5 
B1T04,BI1T4 
B1T03,BI1T3 
BIT02,BITe 
B1T01,B1T1 
B1T00,BITO 


g SBASIC "*CPU"’ TRAP VECTOR eae eae 


LKVEC= 


CACHVEC=114 
PIRQVEC=240 


MMVEC= 
- SBTTL 


LOADRS 


HITMIS 
. SBTTL 


250 
CACHE 


177740 


177752 


MORY 
REGISTER DEF INI TIONS 


TIME OUT AND OTHER ERRORS 
: RESERVED AND ILLEGAL INSTRUCTIONS 


33: TRACE TRAP 
; BREAKPOINT TRAP (BPT) 
Cre TRAP (IOT) **SCOPE** 


AIL 
: EEMULATOR TRAP (EMT) **ERROR** 
""TRAP"’ TRAP 
3;TTY KEYBOARD VECTOR 


VECTOR 
+ LINE CLOCK (KW11-L) VECTER 
CACHE ERROR INTERRUPT VECTOR 
; ;PROGRAM INTERRUPT REQUEST VECTOR 
Y MANAGEMENT VECTOR 


; ;LOWER 16 BITS OF ADDRESS THAT CAUSED ERROR 
;;UPPER SIX BITS OF ADDRESS THAT CAUSED ERROR 
;CACHE ERROR REGISTER 

: IMEMORY CONTROL REGISTER 
sMEMORY MAINTENENCE REGIST 

SZHIT MISS REGISTER Aro TPL IES HIT IN CACHE 


CPU REGISTER DEF INITIONS 


o.2z 


MAINDE C=11-CEKBG-B8 


CEKBGB.P11 


O5-JUN=79 09:14 


177760 
177762 


177764 
177766 


177572 
177574 
177576 
172516 


177600 


177616 


177620 


177652 


2 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30a1059) 06-JUN=79 09:12 PAGE 6 


SIZELO 
SIZEHI 


SYSTID 
CPUERR 


CPU REGISTER DEFINITIONS 


177760 
177762 


177764 
177766 


3sMEMORY SIZE REGISTER NUMBER TO PUT gi A PAR 
3;TO GET TO THE LAST 32 WORDS OF MEMORY 

;;HIGH SIZE REGISTER, RESERVED FOR FUTURE USE 

;; CURRENTLY ALL ZERO 

73SYSTEM ID REGISTER 

3;CPU ERROR REGISTER HOLDS CONDITION THAT CAUSED 
3; THE TRAP TO ERRVEC (600004) 


.SBTTL MEMORY MANAGEMENT DEFINITIONS 


3: *MEMORY MANAGEMENT STATUS REGISTER ADDRESSES 


MMRO= 


“EQUIV MMR3,SR3 


177572 


;*USER ‘'I'' PAGE DESCRIPTOR REGISTERS 


UIPDRO= 
UIPDR1= 
UIPDR2= 
UIPDR3= 
UIPDR4= 
UIPDR5= 
UIPDR6= 
UIPDR7= 


177600 


177616 


;*USER 'D'' PAGE DESCRIPTOR REGISTORS 


UDPDRO= 


UDPDR7= 
7 *USER * 
UIPARO= 


UIPARS= 


177620 


177636 


‘I'' PAGE ADDRESS REGISTERS 


177640 


177652 


SEQ 0020 


mn 2 


MAINDEC-11-CEKBG-B 


CEKBGB.P11 


WIWWNWWNWWWNWNWG 
aah at anh aah aa aah cach oe ed 
COONAUISWR—O 


319 


OS=JUN=79 09:1 


177654 
177656 


177676 


172200 


172216 


172220 


172236 


172240 


172256 


172260 


172274 


a, 
a 74 SYSTEM POWER FAIL MACY11 30A(1052) 
MEMORY MANAGEMENT DEF INI TIONS 


"'D'' PAGE ADDRESS REGISTERS 


O6-JUN=79 09:12 PAGE 7 


;*SUPERVISOR ''I'' PAGE DESCRIFTOR REGISTERS 


"'D'’ PAGE DESCRIPTOR REGISTERS 


: *SUPERVISOR ''I'' PAGE ADDRESS REGISTERS 


UIPAR6= 177654 
UIPAR7= 177656 
; *USER 

UDPARO= 177660 
UDPAR1= 177662 
UDPAR2= 177664 
UDPAR3= 177666 
UDPAR4= 177670 
UDPARS= 177672 
UDPAR6= 177674 
UDPAR7= 177676 
SIPDRO= 172200 
SIPDR1= 172202 
SIPDR2= 172204 
SIPDR3= 172206 
SIPDR4= 172210 
SIPDR5= 172212 
SIPDR6= 172214 
SIPDR7= 172216 
; *SUPERVISOR 
SDPDRO= 172220 
SDPDR1= 172222 
SDPDR2= 172224 
SDPDR3= 172226 
SDPDR4= 172230 
SDPDR5= 172232 
SDPDR6= 172234 
SDPDR7= 172236 
SIPARO= 172240 
SIPAR1= 172242 
SIPAR2= 172244 
SIPAR3= 172246 
SIPAR4= 172250 
SIPAR5= 172252 
SIPAR6= 172254 
SIPAR7= 172256 
; *SUPERVISOR 
SDPARO= 172260 
SDPAR1= 172262 
SDPAR2= 172264 
SDPAR3= 172266 
SDPAR4= 172270 
SDPARS= 172272 
SDPAR6= 172274 


"D'' PAGE ADDRESS REGISTERS 


SEQ 0021 


oe 


J 
MAINDEC-11-CEKBG-8 * A Nae 74 SYSTEM POWER FAIL MACY11 30A(1052) O6=-JUN=79 09:12 PAGE 8 
CEKBGB.P11 OS-JUN=79 09:14 MEMORY MANAGEMENT DEFINITIONS SEQ 0022 
172276 SDPAR7= 172276 

;*KERNEL ‘'I'’ PAGE DESCRIPTOR REGISTERS 

KIPDRO= 

KIPDR1= 

KIPDR2= 

KIPDR3= 

KIPDR4= 

KIPDR5= 

KIPDR6= 

KIPDR7= 

;*KERNEL ‘D'* PAGE DESCRIPTOR REGISTERS 


KDPDRO= 


KDPDR7= 172336 
;*KERNEL “‘I'' PAGE ADDRESS REGISTERS 
KIPARO= 172340 


KIPAR7= 172356 
;*KERNEL ‘D'’ PAGE ADDRESS REGISTERS 
KDPARO= 172360 


172376 KDPAR7= 172376 


-SBTTL UNIBUS MAP REGISTER DEF INITJONS 


;*THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED ‘MAPLXX' 
;*THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED *MAPHXX' 


170200 MAPLOO = 170200 





~_ = 


MAINDEC-11-CEKBG-8 


CEKBGB.P11 O5-JUN-79 09: 


170202 
170204 


K 
All 74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 9 
UNIBUS MAP REGISTER DEFINITIONS 


170202 


170360 


SEQ 0023 





na 2s 


L 
MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=-JUN-79 09:12 PAGE 10 
CEKBGB.P11 O5-JUN-79 09:14 UNIBUS MAP REGISTER DEFINITIONS 


170362 


170376 


. MAPHO7 ,MAPH7 
170016 UBCR2=170016 


IIST REGISTER DEFINITIONS 


INTERNAL REGISTERS 
g ; s PROGRAM~GENERATED TRANSMISSION ENABLE 


Iss 
3; SANITY-TIMER CONTROL STATUS 
23 INPUT MASK 
5 7 ;PROGR&M emcee FLAGS 
6 ;; SANITY-TIMER FLAGS 
7 «RN O/DISCONNECT FLAGS 
10 + EXCEPT IONS 
15 7 MAINTAINANCE CONTROL 


3z11ST INTERRUPT VECTOR 


-SBTTL CONSOLE SWITCH SETTINGS 
ee She a SWITCHES ARE ENABLED, IT SPECIFIES TO we oo 
33_THAT THE CPU WITH THE IIST SELF ID CORRESPONDING TO THE 
‘SEQUIVILENT BIT POSITION IS EXPECTED TO PARTICIPATE IN THIS TEST 


CPO=B81T0 + CPUO MASK LOCATION 
CP1=B1T1 
CP2=BIT2 
CP3=B1T3 CPUS MASK LOCATION 


SEQ 0024 





“eS 


MAINDEC-11=CEKBG-8 


CEKBGB.P11 


505 
506 
507 
508 


510 
511 
512 


O5-JUN=79 09:1 CONSOLE SWITCH SETTINGS 
000100 MPSW= BIT6 
0 UBESW= BITS 
001000 LOE= BIT9 
040000 LOT= BIT14 
1 HOE= B1T15 


i ag 74 SYSTEM POWER FAIL MACY11 30a(1053) 


O6-JUN=79 09:12 PAGE 11 


ae ae SWITCHES CONTROL THE EXECUTION STREAM OF THE 


ENABLE FOR MULTIPROCESSOR CONFIGURATIONS 
ENABLE IF UNIBUS EXERCISER IS TO BE USED 
ENABLE FOR LOOPING ON ERRORS 

ENABLE FOR LOOPING ON TEST 

HALT ON ERROR 


SEQ 0025 


~~ /= 


2 
MAINDEC=11-CEKBG-8 oY bh 74 SYSTEM POWER FAIL aetins 30401053) 06-JUN=79 09:12 PAGE 12 
CEKBGB.P11 OS-JUN-79 09:1 RJPO4 DEVICE REGISTERS 


-SBTTL RJPOS DEVICE REGISTERS 
RPCS1=176700 


uw 
= 
WW 


;:CONTROL AND STATUS 1 
: «WORD COUNT REGISTER 


sUNIBUS ADDRESS 
; DESIRED SM Aya | ADDRESS 


DIDVVIVIVIV 
ae cad al aol a ed 
WOONOUIE 


3 


a tee REGISTER 
VE TYPE 


SERIAL NUMBER REGISTER 
SLOFF SET REGISTER 
2 sDESIRED CYLINDER REGISTER 
eC CURRENT HT ste REGISTER 


a3 GISTER 3 
7,ECC POSITION REGISTER 
176746 RPE C2= 176746 32ECC PATTERN REGISTER 





MAINDE C-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30a (053) 06-JUN-79 09:12 PAGE 13 
CEKBGB.P11 O5=JUN=79 09:14 POWER FAIL FUNCTION TABLE BIT DIFINITIONS SEQ 0027 


-SBTTL POWER FAIL FUNCTION TABLE BIT DIFINITIONS 
NCX=B1T12 2: DON, T SAVE MM > ips 
ME THE POWER FAIL 
DON'T PERFORM a REGISTER SAVE 


SSU=B8I1T 1 TSEND SIGNAL ON 
-SBTTL TRAP CATCHER 


-=0 
7*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A ‘'.+2,HALT"’ 
:*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
LOCATION, °. CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


3zSOFTWARE DISPLAY REGISTER 
G: ~ WORD 3 -SOFTWARE SWITCH REGISTER 
.SBTTL ACT11 HOOKS 


FIC III OIRO OIRO III IOI TOI ITT IR TISAI AIASIASASNISISISIS ISAS SAA 
;HOOKS REQUIRED BY ACT11 
$SV SAVE PC 


321)SET LOC.46 TO ADDRESS OF $SENDAD IN .$SEOP 


322)SET LOC. rt TO ZERO 
33 RESTORE P 





oz 


C 
MAINDE (-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 
LOAD START AND RESTART VECTORS 


CEKBGB.P11 OS-JUN=79 09:14 


000200 
000137 020064 
000220 
004737 020000 
000137 020064 


06-JUN-79 09:12 PAGE 14 


ait LOAD START AND RESTART VECTORS 


JMP 
-=220 
JSR 
JMP 


STRT 


PC, 
STRT 


RESTRT 


;LOAD 200 WITH A JUMP TO START OF TEST 
;LOAD 220 WITH A JUMP TO THE RESTART CODE 


SEQ 0028 





Oz 


MAINDE C-11-CEKBG-8 PDP=11/70,74 igh POWER FAIL MACY11 30A(1052) O6-JUN-79 09:12 PAGE 15 
CEKBGB.P11 O5-JUN-79 99:14 T PARAMETER BLOCK SEQ 0029 


-SBTTL APT PARAMETER BLOCK 


MOR AAA ARASAALAAAAAASLALALAAAASAALASERR ELAR ARES RA RRR RRR R RRR RARE RE SS S| 


SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
JOSS RIESE ISS IEISIDIIOISIOISISISISINISISIDISIDIOIIIOIIOIIISIOIIIOIDIOIDIOISIDIOIDIOIOIDDIDIDINIDIOIDIIOI IE 
3;SAVE CURRENT LOCATION 
33SET POWER FAIL TO POINT TO START OF PROGRAM 
3sFOR APT START UP 
3sPOINT TO APT INDIRECT ADDRESS PNTR. 
3sPOINT TO APT HEADER BLOCK 
3 sRESET LOCATION COUNTER 
FDIS ISIS IOI ISIIOISIOIIOISISIOIIIIOI IOI IIIT TOT TOT TOT TOT TOT TOT TOT TOT TOT TOT TET 
;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT=PDP11 DIAGNOSTIC 
INTERFACE SPEC. 


$SAPTHD: 


’ 


$HIBTS: 0 3:TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

$MBADR: .WORD $MAIL ;;ADDRESS OF APT MAILBOX (BITS 0-15) 

$TSTM: . yo TIM OF LONGEST TEST 

SPASTM: .WORD z3R nfl as IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
000000 SUNITM: . ADDI TIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
000052 ° SETEND~SMAIL/2 ; LENGTH MAILBOX~E TABLE (WORDS) 





oz 


[og 
MAINDEC-11=CEKB8G-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6-JUN=79 09:12 PAGE 16 
CE PI COMMON TAGS 


KBGB.P11 O5=JUN-79 09:14 SEQ 0030 


.-SBTTL COMMON TAGS 


TPP ARASRASASLLAAASAASS SAAR ARSE RARER A RASA SARRR RR ASE RRR ASRS R SAAS SS SD I 


‘*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
**USED IN THE PROGRAM. 


SCMTAG: 3¢START OF COMMON TAGS 


$TSTNM: . :: CONTAINS THE TEST NUMBER 


SERFLG: . :: CONTAINS ERROR FLAG 


$ICNT: :: CONTAINS SUBTEST ITERATION COUNT 
$LPADR: . zi CONTAINS SCOPE LOOP ADDRESS 
$LPERR: . >: CONTAINS SCOPE RETURN FOR ERRORS 


SERTTL: . ;;CONTAINS TOTAL ERRORS DETECTED 


. WOR 
SITEMB: . 


:: CONTAINS ITEM CONTROL BYTE 
SERMAX: : CONTAINS MAX. ERRORS PER TEST 
SERRPC: | :: CONTAINS PC OF LAST ERROR INSTRUCTION 
SERRSP: . ;: CONTAINS SP OF CPU IN ERROR 
SGDADR: . >; CONTAINS ADDRESS OF ‘GOOD’ DATA 


$BDADR: | :: CONTAINS ADDRESS OF "BAD" DATA 


olelenieleleleleleleleleleleol fb O12 el2) 2) elelelelelelelelelclelelelcleleleleleloleleilolelo) 





oz 


MAINDEC-11-CEKBG-8 
CEKBGB.P11 


014120 


014137 
014140 


000000 
000000 
000000 
000000 
000000 


. WORD 
WORD 
$GDDAT: .WORD 
. WORD 
WORD 
. WORD 
$EOPSG: .BYTE 
BYTE 
$BDDAT: .WORD 
. WORD 
. WORD 
WORD 
. WORD 
. WORD 
$AUTOB: .BYTE 
$INTAG: .BYTE 
. WORD 
SwR: WORD 
. WORD 
. WORD 
. WORD 
DISPLAY: .WORD 
. WORD 
WORD 
. WORD 
$$STP: .WORD 
. WORD 
. WORD 
. WORD 
$TKS: 177560 
$TKB: 177562 
$TPS: 177564 
$TPB: 177566 
$NULL: .BYTE 
$FILLS: .BYTE 
$FILLC: .BYTE 
S$TPFLG: .BYTE 
SERGBL: .WORD 
$CPUID: .WORD 
. WORD 
WORD 
. WORD 
$SREGAD: .WORD 
$REGO: .WORD 
$REG1: .WORD 
$REG2: .WORD 
$REG3: .WORD 
$REG4: .WORD 


* 0 Ian 74 SYSTEM , ee FAIL MACY11 30a(1052) O06-JUN=79 09:12 PAGE 17 
OS-JUN-79 09: COMMON | 


0 
0 
4 :; CONTAINS ‘GOOD' DATA 
8 
:;THIS TABLE HOLDS THE END OF PASS 
0 
0 
6 :: CONTAINS 'BAD' DATA 
8 
0 : ;RESERVED--NOT TO BE USED 
0 AUTOMATIC MODE INDICATOR 
. :; INTERRUPT MODE INDICATOR 
DSwR ADDRESS OF SWITCH REGISTER 
DSWR 
DSWR 
DSwR 
DDISP ; ADDRESS OF DISPLAY REGISTER 
DDISP 
DDISP 
DDISP 
STACK i: STACK INITIALIZATION FOR CPUO 
STACK-2000 ss PU1 
STACK-4000  . se *** CPU2 
STACK-10000 Tet ats "** CPU3 
ii TTY KBD STATUS 
:: TTY KBD BUFFER 
i: TTY PRINTER STATUS REG. ADDRESS 
:TTY PRINTER BUFFER REG. ADDRESS 
0 *: CONTAINS NULL CHARACTER FOR FILLS 
2 >: CONTAINS # OF PILLER CHARACTERS REQUIRED 
12 3c ]MSERT FILL CHARS. AFTER A ‘LINE FEED‘ 
0 3" TERMINAL AVAILABLE!” FLAG (BIT<07>=0=YES) 
-1 ::THIS TABLE HOLDS THE PHYSICAL ID OF 
~ 7: THE PARTICIPATING PROCESSORS ARRANGED 
_ 72IN LOGICAL ORDER. 
0 z: CONTAINS THE ADDRESS FROM 
zzWHICH ($REGO) WAS OBTAINED 
0.0.0.0 :: CONTAINS (($REGAD) +0+6) 
0.0.0.0 CONTAINS (($REGAD) +2+6) 
0.0.0.0 :: CONTAINS (($REGAD) +4+6) 
0.0.0.0 :: CONTAINS (($REGAD) +6+6) 
0,0,0.0 : CONTAINS (($REGAD)+10+6) 


SEQ 0031 


Oz 


G 
MAINDE C-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY1! 30A(1052) O6=JUN-79 09:12 PAGE 18 


CEKBGB.P11 O5=JUN-79 09:14 COMMON TAGS SEQ 0032 
705 014306 
706 014310 000000 $TMPO: .WORD 0Q ;;USER DEFINED 
707 014312 $TMP1: .WORD 0 3 ;USER DEFINED 
708 014314 $TMP2: .WORD 0 ;sUSER DEFINED 
709 014316 000000 $TMP3: .WORD 0 ;;USER DEFINED 
710 014320 000000 .WORD 0 aati DEF INED 
711 014322 000000 SESCAPE :0 ESCAPE ON ERROR ADDRESS 
712 014324 000000 -WORD 0 
713 014326 000000 -WORD 0 
714 014330 000000 -WORD 0 
715 014332 077 $QUES: .ASCII /?/ 3 QUESTION MARK 
716 014333 015 $SCRLF: .ASCII <15> 3 CARRIAGE RETURN 
717 +014334 9000012 SLF: eASCIZ <12> 7sLINE FEED 
718 JDO IOI IOI III III IID IOI IIIOIOIIIIOIIIIDIDINIOIIIOIIOIUIOISIDIDIDIDIUIDIDIOIIOIOI 
as -SBTTL APT MAILBOX-ETABLE 
721 SRR RIOR TOIT IOIC SIO SOIOIOIOI ICICI IOS IAA AAA SASIASASISIASIASISAASISAASI ASN AACA 
722 .EVEN 
723 014336 SMAIL: ;;APT MAILBOX 
724 014336 000000 SMSGTY: .WORD AMSGTY ::MESSAGE TYPE CODE 
725 014340 000000 SFATAL: .WORD AFATAL ;;FATAL ERROR NUMBER 
726 014342 000000 STESTN: .WORD ATESTN ;;TEST NUMBER 
727 014344 000000 $SPASS: .WORD APASS = ;;PASS COUNT 
728 014346 000000 SDEVCT: .WORD ADEVCT ; DEVICE COUNT 
729 014350 000000 SUNIT: .WORD AUNIT :1/0 UNIT NUMBER 
730 014352 000000 $MSGAD: .WORD AMSGAD ::MESSAGE ADDRESS 
731 014354 000000 SMSGLG: .WORD AMSGLG see SAGE LENGTH 
732 014356 SETABLE: T ENVIRONMENT TABLE 
733 014356 000 SENV: .BYTE AENV ENVIRONMENT BYTE 
734 014357 000 SENVM: .BYTE AENVM ;;ENVIRONMENT MODE BITS 
735 014360 000000 SSWREG: .WORD ASWREG 2 APT SWITCH REGISTER 
736 014362 000000 $SUSWR: .WORD AUSWR ;USER SWITCHES 
737 014364 000000 $CPUOP: .WORD ACPUOP ::CPU TYPE,OPTIONS 
738 s* BITS eat TYPE 
739 3* 11/04=01, 11/05= 02, 11/20=03,11/40=04,11/45=05 
741 :* BIT 10=REAL_ TIME CLOCK 
742 ;* BIT 9=FLOATING POINT ara 
743 hed BIT 8=MEMORY MANAGEMENT 
744 014366 000 $SMAMS1: .BYTE AMAMS1 ::HIGH ADDRESS.M.S. BYTE 
745 014367 000 SMTYP1: .BYTE AMTYP1 ::MEM. TYPE,BLKA1 
746 s* MEM.TYPE BYTE =~ (HIGH BYTE) 
747 se 900 NSEC CORE=001 
748 se 300 NSEC BIPOLAR=002 
749 :* 500 NSEC MOS=003 
750 014370 000000 $MADR1: .WORD AMADR1 ;;HIGH ADDRESS,BLKA1 
751 el MEM.LAST ADDR.=3 BYTES, THIS WORD AND LOW OF "'TYPE’’ ABOVE 
752 014372 000 SMAMS2: .BYTE AMAMS2 ;;HIGH ADDRESS.M.S. BYTE 
753 =014373 000 $MTYP2: .BYTE AMTYP2 2 3MEM. TYPE ,BLKA2 
754 014374 000000 SMADR2: .WORD AMADR2 ;;MEM.LAST ADDRESS ,BLK&2 
755 014376 000 SMAMS3: .BYTE AMAMS3 ; 7HIGH ADDRESS .M.S.BYTE 
756 014377 000 SMTYP3: .BYTE AMTYP3 ;;MEM.TY ka3 
757 014400 000000 SMADR3: .WORD AMADR3 ::MEM.LAST “ADDRESS. BLKA#3 
758 014402 000 SMAMS4: .BYTE AMAMS4 : ;HIGH ADDRESS .M.S.BYTE 
759 014403 000 SMTYP4: .BYTE AMTYP4 ;;MEM. TYPE BLKAG 


760 014404 000000 SMADR4: .WORD AMADR4 ::MEM.LAST ADDRESS ,BLK#4 





Oz 


MA INDE C-11-CEKBG-8 ea 74 citi POWER FAIL MACY11 30a(1052) 06-JUN=79 09:12 PAGE 19 


CEKBGB.P71 OS-JUN-79 09: T MAILBOX-E TABLE SEQ 0033 
761 014406 000000 $VECT1: .WORD AVECTI ay ls VECTOR#1 ,BUS PRIORITYA#1 
762 014410 000000 $VECT2: .WORD AVECT2 :: INTERRUPT VECTOR#2BUS PRIORITY#2 
763 014412 000000 $BASE: .WORD ABASE : SBASE “ge OF EQUIPMENT UNDER TEST 
764 014414 000000 SDEVM: .WORD ADEVM ICE MAP 
765 014416 000000 $CDW1: .WORD ACDW1 ;;CONTROLLER DESCRIPTION WORD#1 
766 014420 000000 $CDW2: .WORD ACDW2 : CONTROLLER DESCRIPTION WORDA2 
767 014422 000000 $DDWO: .WORD ADDWO ;;DEVICE DESCRIPTOR WORD#0 
768 014424 000000 $DDW1: .WORD ADDW1 ;;DEVICE DESCRIPTOR WORD#1 
769 014426 000000 $DDW2: .WORD ADDW2 ;;DEVICE DESCRIPTOR WORD#2 
770 014430 $DDWS: .WORD ADDWS3 ;;DEVICE DESCRIPTOR WORDA3 
771 014432 000000 $DDW4: .WORD ADDW4 ;;DEVICE DESCRIPTOR WORDA4 
772 34 $DDWS: .WORD ADDWS ;;DEVICE DESCRIPTOR WORDAS 
773 ~014436 $DDW6 WORD ADDW6 ;;DEVICE DESCRIPTOR WORD#6 
774 014440 000000 $DDW7 WORD ADDW7 ;;DEVICE DESCRIPTOR WORDA7 
775 «(014442 $DDW8: .WORD ADDWB ;;DEVICE DESCRIPTOR WORDA8 
776 014444 $DDW9: .WORD ADDW9 ;;DEVICE DESCRIPTOR WORDA9 
777 014446 000000 $DDW10: .WORD ADDW10 ;;DEVICE DESCRIPTOR WORD#10 
778 014450 000000 $DDW11: .WORD ADDW11 ;;DEVICE DESCRIPTOR WORDA11 
779 014452 000000 $DDW12: .WORD ADDW12 ;;DEVICE DESCRIPTOR WORDA#12 
780 014454 000000 $DDW13: .WORD ADDW13 ;;DEVICE DESCRIPTOR WORD#13 
781 014456 000000 $DDW14: .WORD ADDW14 ;;DEVICE DESCRIPTOR WORDA#14 
a4 014460 000000 $DDW15: .WORD ADDW15 ;;DEVICE DESCRIPTOR WORD#15 
784 
one 014462 SETEND: 

787 014462 000000 000000 000000 STOP: 0,0,0,0.0,0,0,0 ;MEM BOX UPPER BOUND ADDRESS TABLE 


014470 000000 000000 000000 


790 014502 000000 000000 000000 START: 0,0.0.0.0.0.0.0 ;MEM BOX STARTING ADDRESS TABLE 
791 014510 000000 000000 000000 


793 014522 000000 PWRFL: 0 3=0 DON'T EXPECT CPU POWER FAIL.=1 EXPECT !T 
014524 000000 YYY 0 ; ERROR ROUTINE WORK LOC 

795 014526 000000 BOOT 0 =0 DON'T EXPECT CPU BOOT, =1 EXPECT IT 

30 000000 PATCHK: 0 $20 WRITE “gl oy MEM PATTERN,=1 CHECK ONLY 

797 014532 000000 HICORE: 0 ;=1 TURN ON MM ON POWER-UP 

798 014534 900000 RELOUP: 0 :=0 DON'T RELOCATE,=1 RELOCATE 

799 014536 000000 RELODN: 0 :=0 ot RELOCATE ,=1 RELOCATE 

800 014540 000000 Te =0 DON'T EXIT, =1 EXIT TEST 

801 014542 000000 ENTR22: 0 ‘CONTROL ENTRY INTO TEST 22 

802 014544 000000 ENTR23: 0 [CONTROL ENTRY INTO TEST 23 

803 014546 000000 ENTR24: 0 CONTROL ENTRY INTO TEST 24 

804 014550 000000 HIBOX: 0 RELOCATE TO THIS MEM BOX 

805 014552 000000 000000 000000 SAVRG: 0,0,0.0 7A PLACE TO SAVE A REGISTER 

806 014560 000000 

807 014562 000000 000000 900000 ROUTE: 0.0.0.0 TYPE TRAP ROUTE TABLE 

as 014570 000000 

810 014572 000000 000000 000000 SAvé: 0,0,0.0 ;SOME PLACE TO PUT THE SP 

811 014600 000000 

812 014602 000000 000000 000000 FLAG: 0,0,0,0 : INSTRUCTION DOWN FLAG 

815 014610 000000 

814 014612 000000 000000 000000 PFFT: .wORD 0,0,0,0 3:POWER FAIL FUNCTION TABLE 

815 014620 000000 

816 014622 000000 000000 000000 PFDT: .WORD 0,0,0,0 ;:POWER FAIL DURATION TABLE 
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000000 000000 


000000 000000 


000000 000000 
000000 000000 
000000 000000 


000000 000000 


000001 000001 


061052 071052 


APT MAILBOX=E TABLE SEQ 0034 
MBDSW: .WORD 0,0,0,0 ::MASSBUS DEVICE SELECTION WORD 
SIGNAL: 0 ; POWER ROUTINE S!GNAL 
SLVID: .WORD 0 +; THIS WORD HOLDS ACTUAL LOG. ID. 
BOXNUM: .WORD 0 : NUMBER OF BOXES OF MK11 MEMORY 
CKSUM: .WORD 0,0,0,0 -CHECKSUM TABLE 
SPSWR: .WORD 0 :PSEUDOSWITCH REGISTER 
PWRTAB: .WORD 0,0,0,0 ‘POWERFAIL DISPATCH TABLE 
ISTTAB: .WORD 0,0,0,0 :1IST DISPATCH TABLE 
ERRTAB: .WORD 0,0,0,0 :CPU ERROR VECTOR DISPATCH TABLE 
SYNC.1: .WORD 0 : SEMAPHORE 
SYNC.2: .WORD 0 * SEMAPHORE 
TYPQUE: .BLKW 1000 “MESSAGE POINTER AREA 
S2L0G1: .WORD 0 ‘LOG-IN LOCK 
S2LOG2: .WORD 0 *LOG-OUT LOCK 
C1: “WORD 0 + :A-FORK CONTROL VARI ABIES 
C2: “WORD 0 
D1: “WORD 0 
D2: “WORD 0 
El: 0 
E2: 
FLAGB: .BYTE 0 
F: "BYTE 0 {MULTIPROCESSOR FLAG 
EF: .WORD 0 TUBE FLAB 
RPPGM: .WORD 0,0.0,0 ‘SHARED RPO4 DRIVE TABLE 
LOOPS: .WORD 0 :# OF LOOPS REQUIRED ON POWER DOWN 
COUNTO: 0 [TIME CPU POWER-DOWN 
COUNT1: 0 
COUNT2: 0 
CCUNT3: 0 
EXTRA: 0 sEST. INITIAL PART OF PWR DWN TIME 
CPUACT: 1 ;CPUS UNDER TEST 
SYNC.3: 1 SEMAPHORE 
INTMSK: 1 ‘list INTERRUPT ENABLE BIT 
ERRLCK: 1 TERROR ROUTINE SEMAPHORE 
C3: *A-FORK CONTROL VARIABLES 
E3: 1 
NOPRMP: 1,1,1,1 :=1 DON'T TYPE CPU IDENTIFICATION 
UBELCK: 1 ;UBE SEMAPHORE 
TOL1: 1 ‘TYPE SEMAPHORE 
S2L1: .WORD 1 ‘INITIALIZATION SEMAPHORE 
ACR: 177500 SIIST ACCESS CONTROL REGISTER 
ADR: 177502 S1I1ST ACCESS DATA REGISTER 
ISTVEC: 260 ‘11ST INTERRUPT VECTOR 
FIRST: .WORD 1 * INCREMENTED BY EACH PROCESSOR 
BMSK: .WORD 400 11ST INITIAL BOOT MASK 
BFADR: .WORD DSKBUF, psxaur+10660- DSKBUF +20000, DSKBUF #30000 :MASSBUS TRANSFER BUF AR 


oe 
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000400 000400 000400 
000400 


177777 
177777 
006405 


PDP=11/70, 74 sd POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 21 


T MAILBOX~E TABLE 
YELLIM: .WORD 400,400,400,400 


PUT: -1 ;CPU UNDER TEST 
TYPLCK: =1 sERROR/TYPE SEMAPHORE 
FACTOR: 20000./6 ;POWER DWN FACTER 


-EVEN 


SEQ 0035 
; YELLOW ZONE BOUNDARY 





~_ = 
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CEKBGB.P11 OS=-JUN-79 09:14 ERROR POINTER TABLE 
po .SBTTL ERROR POINTER TABLE 
881 :*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
882 :*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
883  *LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE eee A iy PERTINENT. 
884 * *NOTE1: IF $ITEMB IS O THE ONLY PERTINENT DATA IS ($ERRP 
44 ‘ ®NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS FEPLAINED AS FOLLOWS: 
887 7* EM 3:POINTS TO THE ERROR MESSAGE 
888 i* DH : POINTS TO THE DATA HEADER 
889 i* DT ::POINTS TO THE DATA 
oy s* DF 7zPOINTS TO THE DATA FORMAT 
892 
893 017062 : SERRTB: 
894 sc ITEM 1 
895 017062 045057 EM1 ;UNEXPECTED POWER FAILURE ON CPU 
896 017064 046346 DHi ;TESTNO ERRORPC 
897 017066 046752 DT10 7 STSTNM, SERRPC 
898 017070 000000 
899 
900 °:ITEA 2 
901 017072 045121 EM2 ;UNEXPECTED POWER UP SEQUENCE ON CPU 
902 017074 000000 0 
903 017076 000000 0 
904 017100 000000 0 
905 
906 sc ITEM 3 
907 017102 045167 EM3 ; ILLEGAL POWER DOWN SEQUENCE 
908 017104 000000 0 
017106 000000 0 
4 017110 000000 0 
912 st ITEM 4 
913 017112 045234 EM4 ; ILLEGAL POWER UP SEQUENCE 
914 017114 000000 0 
915 017116 000000 0 
4s | 017120 000000 0 
918 sc 1TEM 5 
919 017122 045270 EMS sUNEXPECTED TRAP TO LOCATION 4 
920 017124 046244 DHS ;PID ERRORPC CPUERR 
921 017126 046730 DTS :$REGO, $ERRPC, $REG1 
922 017130 000000 0 
923 
924 s: ITEM 6 
925 017132 045317 EM6 ;UNEXPECTED TRAP TO 10 
926 017134 046244 DH5 [PID ERRORPC CPUERR 
927 017136 046730 DT5 
928 017140 
929 
930 sc: 1TEM 7 
931 017142 045347 EM? sUNEXPECTED TRAP TO 114 
932 017144 046277 DH7 sPID ERRORPC CPUERR MEMERR 
933 017146 046740 DT7 7 SREGO, SERRPC,$REG1,$RIG2 
934 017150 000000 0 


_ = 
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935 
9 


017152 


017170 


017172 


017210 
017212 
017220 
017222 
Ws 


017236 
017240 


017242 
017250 


017252 
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045400 
046346 
046752 
000000 


045764 
046545 
047000 
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ERROR POINTER TABLE 


ovom:. 
oe a oe 


ovouor:. 
4+42r 3: 


11 


12 


13 


14 


16 


20 


21 


ADDRESS ON THE STACK IS WRONG 
;TESTNO __ERRORPC 
:$TSTNM, ERRORPC 


OLD PS IS WRONG 
:TESTNO —_ERRORPC PS 
7 $TSTNM,SERRPC ,$REGO 


;O0DD ADDRESS TRAP FAILED 


sMEMORY CORRUPTED ON POWER FAIL 


; TIMEOUT TRAP FAILED 
;TESTNO _ERRORPC CPUERR 
7 STSTNM, SERRPC , SREGO 


;PQWER FAIL RETURNED TO SOON 


NOT ENOUGH OR TOO MABY INSTRUCTIONS EXECUTED 


;NO MEM. MANG. VIOLATION OR TRAP TO 4 


:NO IIST at pai 
; TESTNO STID ACR_ PGTE 
[$TSTNM, $RECO, SREGI. $REG2 , SREGS 


O06-JUN=79 09:12 PAGE 23 


SEQ 0037 
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CEKBGB.P11 05-JUN-79 09: ERROR POINTER TABLE SEQ 0038 
991 017262 046010 EM21 : INCORRECT BRK AND/OR DCF FLAGS 
992 017264 046622 DH21 ;TESTNO ISTID FOUND SHOULD BE 
993 017266 047014 DT21 *$TSTNM, $REGO,$REG1,$REG2 
994 017270 000000 0 
995 
996 sz ITEM 22 
997 017272 046051 EM22 ;CPU DID NOT TRAP TO 24 
998 017274 046672 DH22 ;TESTNO ISTID  ERRORPC 
999 017276 047026 DT22 7 $TSTNM, $REGO, SERRPC 
1000 017300 000000 0 
1001 

1002 sc: 1TEM 23 

1003 017302 046112 EM23 : CHECKSUM ON MASSBUS TRANSFER IS WRONG 
1004 017304 046672 DH22 

1005 017306 047026 DT22 

1006 017310 

1007 

1008 sc 1TEM 24 

1009 017312 046162 EM24 s;NO POWER FAIL ON CPU 
1910 017314 046346 DH10 ; TESTNO ERRORPC 

1011 017316 046752 DT10 : $TSTNM, SERRPC 

1012 017320 000000 0 

1013 

1014 77 1TEM 25 

1015 017322 046211 EM25 ;UNEXPECTED CPU INTERRUPT 
1016 017324 046346 DH10 ; TESTNO ERRORPC 

1017 017326 046752 DT10 7 $TSTNM, SERRPC 

1018 017330 0 

1019 

1020 
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1021 020000 
022 020000 
1023 020000 012704 
1024 012724 
1025 10 2704 


030 020030 103374 
1031 020032 012737 
1038 020040 012737 
1035 020046 012737 

034 020054 012737 
ae 000 


206 
1059 020214 132737 
001403 
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016766 
000001 
017020 
014462 
016764 
177777 
000400 
177777 
177777 
014200 
014226 
000004 
177777 


014722 


000042 
040376 


177570 
000200 


014360 
000100 


017030 


017056 


ERROR POINTER TABLE 


RESTRT: 


1$: 


2$: 


STRT: 


4$: 


40$: 


50$: 


20$: 


25$: 


;;LOAD CODE ABOVE THE FIRST 4k (WORDS) 


.=20000 
MOV #CPUACT, RG 
MOV #1 (RG) + 
CMP ASOL1, RG 
BHIS 1$ 
MOV #STOP, R4 
CLR (RG) + 
CMP HEXTRA, RG 
BHIS  2$ 
MOV #-1, FIRST 
MOV #400, BMSK 
MOV #-1, T 
MOV #-1. — ‘TYPLCK 
RTS PC 
MOV $$STP, SP 
MOV ASCPUID,R4 
MOV #4,R3 
MOV #-1, (R4)+ 
SOB R3,4 
>: INITIALIZE A FEW VECTORS 
MOV #SERROR , @#EMT VEC 
CLR a#EMTVEC +2 
MOV #STRAP, AA TRAPVEC 
CLR QA TRAPVEC+2 
MOV APWRDIS, aAPWRVEC 
CLR @ePWRVEC+2 
MOV #25$, A#ERRVEC 
MOV #TYPQUE+4 , TYPQUE 
MOV ATYPQUE +4. TYPQUE +2 
CLR RO 
CLR R1 
CMP ae42, ansé 
BEQ 40$ 
TYPE  —, TM1 
V #177570, SWR 
BITB  -#APTSIZE, SENVM 
BEQ 50$ 
MOV WSSWREG, SWR 
BIT #MPSW, aSWR 
BNE 20$ 
BEQ 30$ 
MOV WERRDIS ,@#ERRVEC 
MOV #CPUER, ERRTAB(RO) 
MOV #SSWREG, SWR 
MOV #D1SPREG, DISPLAY 
BIT #MPSW, aSWR 
BEQ 3 
MOV #ERRDIS ,a#ERRVEC 
MOV #CPUER, ERRTAB(RO) 
BISB  #BITO,MPF 
BR 31$ 
ADD #4, (SP) 
RT] 
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RESET THE VARIABLES 


RETURN 


INITIALIZE THE STACK 


22GET ADDRESS OF CPUID TABLE 
3 T COUNTER 


ZrINIT TABLE WITH -1'S 


2 EMT VECTOR FOR ERROR ROUTINE 
VEL 0 


32 TRAP VECTOR FOR TRAP CALLS 


::LEVEL 0 


:sPOINT - POWER FAIL DISPATCH ROUTINE 


seLe VEL 





SEQ 0039 


SET _UP CPU ERROR be Hb INCASE SWR IS‘NT THERE 


+: INITIALIZE oe POIN 
Zs INITIALIZE FORWARD 
;UNDER ACT AUTO MODE? 
‘BRANCH IF YES 

; TYPE PROGRAM NAME 
72SET SWR 


7 BRANCH 
:7USE APT SWITCH REG 


POINTER 
::SET ID IN DISPLACEMENT REGS. 


vile UNDER APT? 


:I1S HARDWARE SWITCH REG. aa AND MP SET? 
HERE MP IS 


‘RESET CPU ERROR 


VECTOR 
72FLAG ALL UNEXPECTED TRAPS TO 4 
7;SETUP FOR SOFTWARE SWITCH REG 


21S MP SWITCH SET IN SOFTWARE SWITCH REG? 


:NOPE. 
7 ;RESET ERROR VECTOR 


73FLAG ALL UNEXPECTED TRAPS TO 4 


72SET THE MP FLAG. 


7; 7RETURN FROM TRAP 
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012737 


005001 


012777 
005004 


032702 
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09:1 ERROR POINTER TABLE 


040356 


o 
WNP 


040461 
173534 
014333 
014333 
000040 
000200 
040506 
016740 
040550 


016740 
016737 


002000 


176240 
177770 
041450 


014226 


0 
021110 


000001 


000004 
014702 


014660 


173514 
173504 


176256 


176206 


176174 


31$: 


41$: 


42$: 


43$: 
65$: 


. SBTTL 
55$: 


81$: 


MOV WERRDIS ,a@#ERRVEC y:RESET ERROR VECTOR 
MOV #CPUER, ERRTAB(RO) *:FLAG ALL UNEXPECTED TRAPS TO 4 
CLRB = MPF ::CLEAR THE MP FLAG 
TYPE  ,TM7 +: CUNIPROCESSOR MODE IS IN EFFECTI 
42$ ::ENTER INTO NON MP EXECUTION STREAM 
TYPE  ,T1M6 : | OMULTIPROCE SSOR MODE IS IN EFFECT 
MOV @SWR, SPSWR SET UP PSEUDO SWITCH REGISTER. 
MOV #SWR.R4 :;:POINT TO SWR TABLE 
MOV #4 RS :3SET COUNTER 
MOV WSPSWR, (R4)+ ;LOAD THE SLAVE SWITCH REG. POINTERS 
SOB R5,41$ LOOP TILL DONE 
TYPE ,TM2 srg OI TCH REGISTER = 
V @SWR,-(SP) *ZSAVE aSWR FOR TY ;PEOUT 
TYPOC t:GO0 TYPE=-OCTAL ASCII(ALL DIGITS) 
TYPE  ,$CRLF SZ TYPE CRLF 
TYPE ,$CRLF 
BIT MUBE SW, @SWR ;UBE SWITCH SET? 
BEQ 43$ USED 
BIT #SWO7, aSWR 3 WILL SECTION 1 BE SKIPPED? 
BNE 43$ : (CH IF YES 
TYPE =, TM4 3 TUNIBUS | EXERCISER WILL BE USEDJ'' 
INCB BEF *:SET UBE F 
TYPE  ,TMS 32" TUNIBUS EXERCISER WILL NOT BE USED]"' 
CLRB —sCUBEF [=CLEAR THE UBE FLAG 
TSTB = MPF ; [MULTIPROCESSOR RODE IN EFFECT? 
BNE 55$ [:BRANCH IF YES 
JMP STO [START SETTING UP VECTORS 
BOOT AND INITIALIZE THE SLAVE CPUS 
MOV aSwR,R2 >:COPY SWITCH REGISTER INTO R2 
MOV #1, CPUACT S:RESET # OF ACTIVE CPUS 
BIS #B1T15,aACR ::INITIALIZE THE IIST. 
MOV #1,@ACR ACCESS PGCS REGISTER 
BIT #B1T11,@ADR t:1S IT "ALMOST READY'' 
BEQ 81$ ::NOT YET. 
MOV #2000,R5 ::SET UP COUNTER 
SOB RS,. *:WAIT UNTIL IIST IS REALLY READY 
MOV @ACR,RS +: COPY ACR TO R5 
ASH #-10.R5 t:CREAT PHYSICAL ID 
TYPE  ,TM76 ‘IDENTIFY THE MASTER 
V RS, -(SP) 
TYPDS 
MOV RS,$CPUID ::SET SELF ID OF MASTER IN TABLE 
CLR RO : :REGO. CONTAINS WORD DISPLACE- 
T INTO CPUID TABLE *** 
CLR R1 zk) N CONTAINS THE BYTE DISPLACEMENT,... 
HE TRUE LOGICAL 
MOV #DCF,@A ACCESS DCF REGISTER OF IIST 
MOV aADR RRs” R COPY ptf IN TO R3 
ASH #-10.R :BRING BRK MASK INTO POSITION 
MOV #SLVENT @ISTVEC =:SET ENTRY POINT FOR SLAVES 
CLR R4 :R4 CONTAINS THE DECIMAL VALUE 
“OF THE SELF ID OF THE CPU UNDER 
:EINTER OGATION. 
BIT #BITO,R2 “DO WE WANT THIS CPU? 


SEQ 0040 


C 
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CEKBGB.P11 O5-JUN-79 09:14 BOOT AND INITIALIZE THE SLAVE C 


2$ » CONT INUE 
000001 SSLTO.RS Hi18. IT ALIVE? 


014310 MO R4,$TMPO ‘+ CAVE CONTENTS OF R4 
014333 /$CRLF : NO, CRLF 
040761 ™11 “CPU # 
014310 MOV $TMPO,-(SP) SAVE $TMPO FOR TYPEOUT 

::G0 TYPE--DECIMAL ASCII WITH SIGN 
040772 ,TM12 i SPECIFIED BUT NOT ACTIVE'' 
014226 : R4. SCPUID 1S THIS THE MASTER? 


IGNORE 
020000 000000 #20000, a#0 in931 Sp MOVES a#0 TO SP ON BOOT 
000000 i ACCESS PGTE REG. 

017032 iSET TO BOOT AND THEN... 

000001 176070 i: THE CPU 

000200 MO 00, R tiSET "'y A LONG DELAY (5 SEC) 


e 0O$ 
000001 176050 : MOV CHECK FOR IIST READY 
004000 176044 


$ ;BRANCH IF NOT 
176034 84$: aACR a at ACR (POINT TO 
016772 176030 MO P sSET UP TO INTERRUPT 
000001 176022 . ~ INTERRUPT SLAVE 
016766 : COUNT ANOTHER ACTIVE 
000003 : on :2ALL CPUS STARTED? 


3sNEXT CPU_TO ATTEMPT 
7sNEXT SWITCH REG. BIT 
7 sNEXT BRK BIT TO SET 
017032 BMSK :sNEXT BOOT MASK 
016772 3 NEXT INTERRUPT MASK 
1$ ;GO TRY ANOTHER 
001000 177746 : A#BIT9, CONTRL :SET CACHE BYPASS 
000000 ar0 ;RESTORE LOC. 0 


MMMIVIUIVIVI IU ES BS BER ERE ROW 


SLEALALIS SSIFALUN LS GHVRAGRGALSSSSLEGEA f 


‘ 
: 
; 
} 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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021074 


021330 


052737 
012706 


010079 
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000014 
014000 


014160 
014200 


035200 
014344 


177776 


014322 
021212 
021222 


014200 


100000 
021420 
014200 


100000 
021420 
014200 


100009 
021420 
016737 


017026 
000002 
175472 


177746 


035166 


177746 


175646 
175640 
175634 


014032 


175554 


175534 


175514 


INITIALIZE THE COMMON T 
INITIALIZE THE COMMON TAGS 


. SBTTL 


STO: 


SLVENT: 


MSTENT: 


10$: 


FORKTB: 


SL1: 


SL2: 


SL3: 


MSO: 


— THE costly TAGS ps al AREA 


06-JUN=79 09:12 PAGE 28 
SEQ 0042 


BIS ;DISABLE C CHE 
MOV FSCATAG, R6 FIRST LOCATION TO BE CLEARED 
CLR (R6)+ SI CLEAR MEMORY LOCATION 
CMP #SWR,R6 ;;DONE? 
BNE -~6 ;:LOOP BACK IF NO 
MOV $$STP,SP 7;SETUP THE STACK POINTER 
MOV SENDCT,SEOPCT :;SETUP END-OF-PROGRAM COUNTER 
CLR $PASS 3: :CLEAR PASS COUNT 
BR MSTENT 
BIS WBITO,Q@ACONTRL ;;TURN OFF CACHE 

INC SLVID 2s CREATE CPUID 
MOV SLVID,R1 is MOV TO R1 
MOV R1,RO0 
ASL thn ad F _ INDEX INTO CPU TABLE 
MOV aaACcR, RS COPY 
ASH #-10, -:GET T MET 
MOV RS, $CPUID(RO) sSET SELF- t INTO TABLE 
BIS #B1T15,a@ACR + CRESET THE IIST 
MOV #PGCS, @ACR ;ENABLE INTERRUPTS 
BIS WBIT2, @ADR 
CLR SW ; LOWER PROCESSOR PRIORITY 
CLR $ESCAPE (RO) : CLEAR THE ESCAPE(RO) ON ERROR ADDRESS 
MOV IDS (RO) . $LPERR(RO) 7: SETUP FOR THE ERROR LOOP ADDRESS 
tort aF ORKTB(RO) ; DISPATCH THE FOLLOWERS 
TST1 
TST1 
TST1 \ 
MSO 
SL1 
3 
MOV $$STP(RO) SP sz INITIALIZE SLAVE STACK (CPU1) 
WAIT :zWAIT FOR MASTER TO START VIA INTERRUPT 
BIS #BIT15,@ACR 7 RESET THE IIST 
JMP TST1 
MOV $$STP(RO),SP hry toe 3 SLAVE STACK (CPU2) 
WAIT WAIT FOR MASTER TO INTERRUPT 
yh > tae + SRESET THE IIST 
MOV S$S$STP(RO),SP ac StT IAS 126 SLAVE STACK (CPU3) 
WAIT WAIT FOR MASTER TO INTERRUPT 
BIS #B1T15,a@ACR + RESET THE IIST 
JMP TST1 
TSTB MPF 32MP MODE? 
BEQ BEGIN :ZzNO,DON'T TRY TO INTERRUPT CPUS 
MOV ISTVEC, R2 :SET UP RETURN FROM INTERRUPT 
ADD #2, ke 
MOV Re, alSTVEC 
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012712 


000001 
052777 100000 


021420 


INITIALIZE THE COMMON T 


175454 


016766 
175424 


175414 7$: 


175402 


#2, (R2) 
#PGTE ,@ACR 


@SWRR2 
95900, R2 
R2,@ADR 
#BITO, CPUACT 
7$ 

#5,@ADR 

4$ 

#7,@ADR 
#B1T15, AACR 
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ACCESS a REGISTER 
T COPY OF SWR 

SKEEP ONLY. THE CPU MASK 

;SET THE INTERRUPT BITS 

SEVEN OR ODD? 

BRANCH IF EVEN 

:GO WITH NO PARITY,ENABLE INTERRUPTS 


3GO WITH PARITY,ENABLE INTS. 
:WAIT FOR IIST TO INTERRUPT 
;sRESET THE IIST 
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Q05=-JUN=79 09:14 


PDP=11/70,74 SYSTEM POWER FAIL MACY11 ao O6=JUN=79 09:12 PAGE 30 
INITIALIZE THE COMMON T 


SC SAAR AARREAARARERAAKAARARARERARAAARERAAHE RHRRAARAAARERAARRARRARRRARAAHH 
CS AAARARAARAAAARRAAAKARRARAREARRARRRARRARAA AHAKARAAARRERRHARRAAERAERARARH 


SU RRA R AERA REERREKRRREKRAKREREE 
RRR Reeene RARAREAKARARREKREREE 
ee 

CCAR ARARRERE RREKKKREARAARREAARE 


CLARA ARARRAAAARARRAAAARARAAHORARAAHARAAAAAEAAEAREHEARAAHERAARAARARARAARA ES 
CFA AAERARAERAERARAEAEAEERRERAAARRERARAR AERA AAARAAAARARERAARHARAEREAEE 


SEQ 0044 


os 


G 
MAINDE C-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 3oac4053) 6 epee 09:12 PAGE 31 


CEKBGB.P11 — Q5=JUN=79 09:14 1 SIMPLE DOWN/UP TEST (KERNAL) SEQ 0045 
1262 DDO IIOISIIIOIIOIOIIIOIIOIDIOIIIIIIDIIIOIOIIOIOIIDIUIOIUIIUIDIUIDIIUIOIOIOIUIIDIDIOIUIDIIUIIOIUIIOIE 
1263 S*TEST | SIMPLE DOWN/UP TEST (KERNAL) 

1264 RAIDS IIDIDIDIOIOINIIIIIOII IUD IOIUIDIIUIDISIIOIUICIIUIUIOIIUIUI I RIOR IR tt 
1265 021420 TST1: 

1266 021420 012777 000001 172542 MOV #1, @DISPLAY ;SET TEST NUMBER 

1267 021426 012737 033530 014662 MOV #POWDWN , PWRTAB ;SET UP POWER DOWN VECTOR 
1268 021434 012737 033074 000114 MOV #PARERR, a4 CACHV VEC ;SET PARITY ERROR VECTOR 
1269 021442 012737 000001 033076 MOV wi, @#PARF LG ;SET MULTI PARITY ERROR INDICATOR 
1270 021450 012737 040340 000024 MOV #PWRDIS , AAPWRVEC :SET LOC 24 

1271 021456 005037 000026 CLR @APWRVEC +2 :SET LOC 26 

1272 021462 032770 000200 014160 BIT #SW07, @SWR(RO): s SKIP SECTION 1? 

1273 021470 001402 BEQ 1$ CH IF NO 

1274 021472 000137 024170 JMP SEC2 TELSE GO TO SEC2 

1275 021476 005700 1$: TST RO :IS THIS THE MASTER? 

1276 021500 001011 BNE 4$ BRANCH IF NO i 

1277 021502 104401 041370 TYPE ~™M14 i ENTERING SECTION 1 

1278 021506 105737 016740 TSTB UBEF [USING THE UBE? 

1279 0271512 001004 BNE 4$ “BRANCH IF YES 

1280 021514 104401 041024 TYPE 113 ;PRINT INSTRUCTIONS 

1281 021520 104401 014333 TYPE “$CRLF 

1282 021524 j 4$: 

1283 021524 005037 177776 CLR a4PSs ;SET KERNAL MODE 

1284 021530 012705 021566 MOV #2$ ,R3 set POWER UP RETURN 

1285 021534 105737 016740 TSTB UBEF ;;USE UNIBUS EXERCISER? 

1286 021540 001407 BEQ 64$ BRANCH IF NO 

1287 021542 106237 017014 ASRB UBELCK : LOCK OUT OTHER CPUS FROM PROCEEDING 
1288 021546 103375 BCC 74 

1289 021550 000241 CLC 

1290 021552 052737 000020 170016 BIS #BIT4,a@#UBCR2 ;;SET TO POWER FAIL 

1291 021560 64$: 

1292 021560 3$: 

1293 021560 005037 177776 CLR aA4PS :SET KERNAL MODE 

1294 021564 000001 WAIT WAIT FOR THE POWER FAIL 

1295 021566 010602 2$: MOV SP Re “GET SP 

1296 021570 016004 014200 MOV SSSTP(RO) ,R4 7R4 —. THE STACK INIT. VALUE 
1297 021574 162704 00000¢ SUB #4 RS iSTA 

1298 021600 020402 CMP R4,R2 “CHECK a 

1299 021602 001401 BEQ +4 :SKIP IF 

1300 021604 000000 HALT : SP NOT STACK =4"" 

1301 021606 016006 014200 MOV $SSTP(RO),SP ;RESET SP 

1302 021612 012402 MOV (R4)+,R2 GET RETURN ADDRESS 

1303 921614 105737 016740 TSTB UBEF 71S THE UBE BEING USED? 

1304 021620 001004 BNE 72$ :YES 

1305 021622 022702 021566 70$: CMP #2$,R2 2 CHECK sooess 

1306 021626 00140? BEQ +4 ; SKIP 

1307 021630 000000 HALT ‘ADDRESS ON STACK IS WRONG 

1308 021632 011402 723: MOV (R4) ,R2 GET OLD PS 

1309 021634 022702 000000 CMP #0,R2 CHECK OLD PS 

1310 021640 001401 BEQ +4 :SKIP IF OK 

1311 021642 000000 HALT ;OLD PS IS WRONG 

1312 021644 032770 640000 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 

ti 021652 001262 BNE TST1 LOOP TO TST1 

1315 

1316 LRN EERE EERE ARERR ERR ERE REE RE RAE Re 
1317 s*TEST 2 PROGRAM VOLATILITY TEST 


Oz 


H 4 
et ee PDP=11/70,74 sities POWER FAII MACY11 30A(1052) 06=JUN=79 09:12 PAGE 32 
oe KBG. 


P11 05=JUN-79 09:14 PROGRAM VOLATILITY TEST SEQ 0046 
1318 SS RAARAAAARERAAARARARAARAARAREERAKRARAARRARAARAREARAARRARAARARAARER EHS 
1319 021654 TST2: 

1320 021654 012777 000002 172306 MOV #2, DISPLAY :SET TEST NUMBER 

1321 021662 7 177776 CLR aAPs ‘SET KERNAL MODE 

1322 021 012702 01 MOV #10000.R2 INIT. COUNTER 

1323 021672 012703 920000 MOV #20000 ,R3 INIT POINTER 

1324 021676 005060 014650 CLR CKSUM(RO) [RESET THE CHECKSUM LOCATION 
1325 021702 062360 014650 1$: ADD (R3)+,CKSUM(RO) :DO CHECKSUM ON 2ND 4K(W) BANK 
1326 021 005560 014650 ADC CKSUM(RO) 

1327 021712 077205 S0B R2,1$ 

1328 021714 012703 021750 MOV #2$ ,R3 ;POWER UP RETURN 

1329 021720 105737 016740 TSTB —CUBEF S;USE UNIBUS EXERCISER? 

1330 021724 001407 BEQ 64$ : BRANCH IF NO 

1331 021726 106237 017014 ASRB —«UBELCK =LOCK OUT OTHER CPUS FROM PROCEEDING 
1332 021732 103375 BCC 6 

1333 021734 000241 CLC 

1334 021736 052737 000020 170016 BIS WBIT4,QMUBCR2  ;;SET TO POWER FAIL 

1335 021744 648: 

1336 021744 000001 WAIT :WAIT FOR THE POWER TO FAIL 

1337 021746 000000 HALT “BAD 

1338 021750 012702 010000 2s: MOV #10000.R2 

1339 021754 012703 020000 MOV #20000.R3 

1340 021760 005004 CLR RG 

1341 :VERIFY THAT EVERYTHING IS OK 

1342 021762 062304 38: ADD (R3)+,R4 

1343 021764 005504 ADC R4 

1344 021766 077203 S508 R2,3$ 

1345 021770 020460 014650 CMP R4.CKSUM(RO)  ; COMPARE NEW CHECKSUM WITH OLD 
1346 021774 001401 BEQ 5$ “BRANCH IF OK 

1347 021776 HALT ERROR 

1348 02 016006 014200 5$: MOV $$STP(RO),SP RESET THE STACK 

1349 022004 032770 040000 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 

1350 022012 001320 BNE TST2 [LOOP TO TST2 

1351 DOI III IIUIDIOIIIUIOIUIOIIIOIOIOIIOIOIOIOI IIIT TIOIOISIOIOIOI TIO ITI SE 
1352 TRTEST 3 SIMPLE DOWN/UP TEST (SUPERVISOR) 

1353 CLARE REEREEEEEE EERE REE REE EREER REE 
1354 022014 1513: 

1355 022014 012777 000003 172146 MOV #3, DISPLAY ;SET TEST NUMBER 

1356 022022 012737 040000 177776 MOV #20000, aaPS >SET SUPERVISOR MODE 

1357 022030 012703 022070 MOV #2$,R3 :SET POWER UP RETURN 

1358 022034 105737 016740 TSTB —sUBEF >;USE UNIBUS EXERCISER? 

1359 022040 001407 BEQ 64$ + BRANCH IF NO 

1360 022042 106237 017014 ASRB —sUBELCK :LOCK OUT OTHER CPUS FROM PROCEEDING 
1361 022046 103375 BCC 4 

1362 022050 000241 cLC 

1363 022052 052737 000020 170016 BIS WBIT4,@MUBCR2  ;;SET TO POWER FAIL 

1364 022060 648: 

1365 022060 3$: 

1366 022060 012737 040000 177776 MOV #40000, aaPS :SET SUPERVISOR MODE 

1367 022066 000001 WAIT [WAIT FOR THE POWER FAIL 

1368 022070 016006 014200 2$: MOV $$STP(RO),SP : RESET 

1369 022074 016004 014200 MOV $$STP(RO) .R4 

1370 022100 162704 000004 SUB #4 RG 


Oz 


MAINDEC-11-CEKBG-8 
CEKBGB.P11 05-JUN-79 09:14 


RI 
BHVRARAS 


SREREEES 


SS SSSsSEsesssE 


0 
022144 


022146 


012402 
105737 
001004 


032770 
001323 


012777 


052737 


012737 
00000 


012777 
005037 


PDP-11/70,74 win aoa 18 FAIL MACY11 30a(1053) 


016740 
022070 


040000 


040000 


000004 
140000 
022222 
016740 


017014 
000020 
140000 
014200 
014200 
000004 
016740 
022222 
140000 


040000 


000005 
177776 


014160 


172014 


177776 


170016 


177776 


014160 


171662 


I 


3 > ia 09:12 PAGE 33 


MPLE DOWN/UP TEST (SUPERVISOR 


V (R4)+,R2 

TSTB UBEF 
BNE 72$ 

70$: CMP #2$,R2 
BEQ +4 
HALT 

72$ MOV (R4) ,R2 
CMP #40000 ,R2 
BEQ +4 
HALT 

1$: 
BIT #SW14,aSWR(RO) 
BNE TST3 


;GET RETURN ADDRESS 


CHECK ADDRESS 

;SKIP_IF OK 

ZADDRESS ON STACK IS WRONG 
GET OLD PS 

+ CHECK OLD PS 

;SKIP_IF OK 

;OLD PS IS WRONG 


;LOOP ON TEST? 
;LOOP TO TST3 


STRACK REERKEEREEREREKEREEEEERER RRR EKREREE EE 


SIMPLE DOWN/UP TEST (USER) 


MAAS AAASAAALAAALZALASLASALASALASASLALS ELAS ARARASARA RSA RS SSS SSS SS | 


;SET TEST NUMBER 

SET USER MODE 

;SET POWER UP RETURN 

; SUSE ee EXERCISER? 


NO 
:LOCK OUT OTHER CPUS FROM PROCEEDING 
3zSET TO POWER FAIL 


SET USER MODE 

:WAIT FOR THE POWER FAIL 
:RESET SP 

GET a INIT. VALUE 


MINUS 
“GET STACK=4,AUTOINC. STACK 


CP. so 
ADDRESS = STACK IS WRONG 


“LOOP TO TST4 


'WERARARASSASALASASALESLARARLARASRRARARE SERS RRR ERR RRR RRR RRR RRR SRR ASS BS 


POWER FAIL WITH ODD ADDRESS 


'WEOERARAAAARASALSLZELLLESSSLS SERRE RRR ER RR RE RRR ASR RRR RRR RRR ARR RRR AAS DI 


;*TEST 4 

1814: 
MOV #4 ,aDISPLAY 
MOV #140000. a4PS 
MOV #2$,R3 
TSTB UBEF 
BEQ 64$ 
ASRB UBEL CK 
BCC 74 
CLC 
BIS #B1T4, a#UBCR2 

64$: 

3$: 
MOV #140000, a4PS 
WAIT 

2$: MOV $$STP(RO),SP 
MOV $$STP(RO) RS 
SUB #4 RG 
MOV (R4)+,R2 
TSTB UBEF 
BNE 72$ 

70$: CMP #2$,R2 
BEQ +4 
HALT 

72$: MOV (R4) ,R2 
CMP #140000,R2 
BEQ +4 
HALT 
BIT #SW14,aSWR (RO) 
BNE TST4 

;*TEST 5 

TSTS: 


MOV #5 ,aDISPLAY 
CLR a4Ps 


+ TEST NUMBER 
;SET KERNAL MODE 


SEQ 0047 


oz 


MA INDE C-11-CEKBG-8 


CEKBGB.P11 
022312 


022412 


O5-JUN-79 09:14 


012760 


PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=-79 09:12 PAGE 34 
15 POWER FAIL WITH ODD ADDRESS 


022350 014702 #3$,ERRTAB(RO) ;SET TRAP VECTOR 
022376 MO #1$,R3 ;SET RETURN ADDRESS FOR POWER FAIL 


016740 UBEF ;;USE UNIBUS EXERCISER? 
64$ ; ;BRANCH IF NO 
017014 — ;LOCK OUT OTHER CPUS FROM PROCEEDING 


CL 
000020 170016 MBIT4,@AUBCR2 ;;SET TO POWER FAIL 


014200 : $$STP(RO),SP RESET STACK 
000003 ans =CAUSE ODD ADDRESS TRAP 
016740 UBEF +:;USE UNIBUS EXERCISER? 


65$ 
000020 170016 #BIT4,@AUBCR2 ;;CLEAR POWER FAIL ENABLE 
; ODD nage ~~ FAILED 
040362 014702 : MOV #CPUER, ERRTAB(RO) RESET 4 


040000 014160 #SW14,@SWR(RO) ;LOOP ON TEST? 
TSTS ;LOOP TO TST5 





oz 


MAINDEC-11=-CEKBG-8 AF hal 74 SYSTEM POWER FAIL MACY11 30a(4053) 06-JUN-79 09:12 PAGE 35 


CEKBGB.P11  05=JUN-79 09:1 16 POWER FAIL IN THE RED ZONE SEQ 0049 
1446 JDO III ISIIIUINITISIS IIS IOIIUIDIDISIIOIIIOIIDIIOIUIOIDIOIOIOIOIUIUIIIIIIOIIOIOIID 
1447 i*TEST 6 POWER FAIL IN THE RED ZONE 
1448 ZRII IIIS III IIIISISICIOIIIOIOIOIOIOIOIUIOIUIOIDIDIOIDIOIDII TIO TO TOE 
1449 022414 TST6: 

1450 022414 012777 000006 171546 MOV #6, QDISPLAY SET TEST NUMBER 

1451 022422 005037 177776 CLR a4PS SET KERNAL MODE 

1452 022426 012760 022476 014702 MOV #2$,ERRTAB(RO) :SET TRAP REGISTER 

1453 022434 012703 022530 MOV #1$,R3 ;SET POWER UP RETURN 
1454 022440 012706 000002 MOV #2,SP 7SET STACK TO RED ZONE 
1455 022444 105737 016740 TSTB UBEF ;sUSE UNIBUS EXERCISER? 
1456 022450 001407 BEQ 64$ ; CH_IF NO 

1457 022452 106237 017014 ASRB UBELCK :LOCK OUT OTHER CPUS FROM PROCEEDING 
1458 022456 103375 BCC 74 

1459 022460 1 CLC 

1460 022462 052737 000020 170016 BIS #BIT4,QMUBCR2 = ;;SET TO POWER FAIL 

1461 022470 64$: 

1462 022470 005037 177776 CLR a4PS SET _KERNAL MODE 

1463 022474 000001 WAIT :WAIT FOR POWER FAIL TRAP 
1464 022476 012737 022504 014662 2$: MOV #7$ ,PWRTAB :SET UVEC TO HALT 

1465 022504 7$: 

1466 022504 105737 016740 TSTB UBEF 3;USE UNIBUS EXERCISER? 
1467 022510 001403 BEQ 65$ 

1468 022512 042737 000020 170016 BIC WBIT4,@A#UBCR2 ;;CLEAR POWER FAIL ENABLE 
1469 022520 65$: 

1470 022520 000000 HALT ILLEGAL TRAP TO 4 

1471 022522 012737 033530 014662 MOV #POWDWN,PWRTAB RESET DVEC 

1472 022530 016006 014200 1$: MOV $$STP(RO) ,SP RESET STACK 

1473 022534 012760 040362 014702 MOV #CPUER ,ERRTAB(RO) sRESET 4 

1474 022542 013702 000002 MOV a2 .R2 ;GET FOR TYPING 

1475 022546 023727 000002 000000 CMP ave ,40 :I1S 2 OK? 

1476 022554 001401 BEQ +4 SKIP IF OK 

1477 022556 000000 HALT NO! 

1478 022560 013702 000000 MOV a#0 ,R2 GET FOR TYPING 

1479 022564 022737 040340 000000 CMP #PWRDIS ,a#0 71S 0 es 

1480 022572 001401 BEQ +4 :SKIP IF OK 

1481 022574 000000 HALT 70 IS WRONG! 

1482 022576 032770 040000 014160 BIT #SW14,@SWR(RO) ;LOOP ON TEST? 

1483 022604 001303 BNE TST6 ;LOOP TO TST6 

fe: 

1486 DDI ISIIIIIIIIDIDIIUIIOIIUIIOIUIUIOIIIOIOIIUUIUUIUIUU OO tit 
1487 s*TEST 7 POWER FAIL WITH TIME OUT (KERNAL) 

1488 LL ERR ERR EERE REE REE RRR RR ERR 
1489 022606 TST7: 

1490 022606 012777 000007 171354 MOV #7 ,@DISPLAY 7SET TEST NUMBER 

1491 022614 005037 177776 CLR Ss [SET KERNAL MODE 

1492 022620 012760 022656 014702 MOV #3$,ERRTAB(RO) ;SET TRAP VECTOR 

1493 022626 012703 022710 MOV #1$,R3 ;SET UP RETURN ADDRESS FOR POWER FAIL 
1494 022632 105737 016740 TSTB UBEF 3;USE UNIBUS EXERCISER? 
1495 022636 001407 BEQ 64$ ; BRANCH IF NO 

1496 022640 106237 017014 ASRB UBEL CK ;LOCK OUT OTHER CPUS FROM PROCEEDING 
1497 022644 103375 BCC 74 

1498 022646 000241 CLC 

1499 022650 052/737 000020 170016 BIS #B1T4,aMUBCR2 = ;;SET TO POWER FAIL 

1500 022656 64$: 

1501 022656 016006 014200 3$: MOV $$STP(RO),SP SET STACK 


ahr ee aee > AE asic TNS ee aah itch ae lt a SE ON LRA ES 


a2 


L 
MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30aci0s3) Q06-JUN-79 09:12 PAGE 36 
CEKBGB.P11 O5=JUN=79 09:14 17 POWER FAIL WITH TIME OUT (KERNAL) SEQ 0050 


177776 a#PS 7 SET 1; MODE 
173000 MOV RO,@4173000 ;CAUSE A_ TIMEOUT 
016740 UBEF ;;USE UNIBUS EXERCISER? 


65$ 
000020 MBIT4,QMUBCR2 ;;CLEAR POWER FAIL ENABLE 


Af ee: + FAILED 
014200 : $$STP(RO) ,SP ;SET STACK 
040362 #CPUER, ERRTAB(RO) sRESET 4 
040000 #SW14,@SWR(RO) ;LOOP ON TEST? 
TST7 :LOOP TO TST7 


FIRE REE REE EERE REE KEE RER AKER EEE KER EEE EEK EK 
s*TEST 10 POWER FAIL IN THE YELLOW ZONE (KERNAL) 
FL RRR HERE E RE KKEEEKEEKREERKEEEREEEKKKEEKREKKEKEREREREKREERR EK 
TST10: 
012777 000010 171230 #10, aDISPLAY + SET TEST NUMBER 
005037 177776 aAPs 
014602 FLAG st 
023040 014702 #2%$,ERRTAB(RO) *SET SICK TPAP ADDRESS 
000400 #400,SP ;SET STACK TO YELLOW ZONE 
023020 MOV SET RETURN ADDRESS FOR POWER FAIL 
016740 ;;USE UNIBUS EXERCISER? 


64 Re CH IF NO 
017014 ;LOCK OUT OTHER CPUS FROM PROCEEDING 


MMA AMI VII UIT UIT 
SOMNAUNRWN=O N 


Nm 
iY) 


wi 
mnn 
Wh 


Mr 
NS 


000241 
052737 000020 170016 MBIT4,@#UBCR2 ;;SET TO POWER FAIL 


005037 177776 aAPS 7SET KERNAL MODE 
000001 ;WAIT FOR POWER FAIL 


105737 016740 : UBEF ::USE UNIBUS EXERCISER? 
000020 170016 #BI1T4,@#UBCR2 ;;CLEAR POWER FAIL ENABLE 
:POWER FAIL RETURNED TOO SOON 


BR 4$ SKIP SP CH HECK 
040362 014702 : ny ae ERRTAB(RO) RESET 4 
014602 LAG iI THE FIRST INSTRUCTION FLAG SET? 


1016 cs YES 
012737 023062 014662 #7$,PWRTAB SET UVEC TO HALT 
105737 016740 > UBEF ;;USE UNIBUS EXERCISER? 
001403 66$ 
042737 000020 170016 #BIT4,@#UBCR2 ;;CLEAR POWER FAIL ENABLE 


000000 NOT ENOUGH OR TOO MANY INSTR. EXEC. 
012737 033530 014662 APOWDWN , PWRTAB SET DVEC 


000404 :GET OUT 

012703 023120 : MOV #4$,R3 SET RETURN 

000002 :GO TO THE POWER FAIL ROUTINE 
[SHOULD NOT RETURN HERE 


023120 032770 040000 014160 | #SW14,aSWR(RO) ;LOOP ON TEST? 


PPP Sethe babys beth tytt ¢h gh 42 4 
VU SSRIRARAYLSS 


Ww 
RPRARAALELELER 


& 


1 
1 
1 
1 
1 
1 
1 
} 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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1 
1 
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1 
1 
1 
1 
1 
1 
1 
1 
7 
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MAINDEC-11-CEKBG-8 = tl 74 wae POWER FAIL MACY11 30a(1059) 06-JUN-79 12 PAGE 37 
CEKBGB.P11 05-JUN-79 09:1 T10 POWER FAIL IN THE YELLOW ZONE (KERNAL) SEQ 0051 


023126 001301 BNE TST10 ;LOOP TO TST10 


MARAE SRASAAAALALALASLSASAARAALSAALESASS LSS EASES SRS ARR SRR RRR SARS RARER SS 
STEST 11 POWER FAIL WITH RESETS 
'MASBASBSAAAAASGAASLLALALSASASESA SELES ESE SAS ERS R RRR ERR RRR RRR RARE SS SY 
023130 rsT11: 
012777 000011 171032 MO #11, @DISPLAY ‘SFY TEST NUMBER 
a4PS SET KERNAL MODE 
#1$,R3 ; SET - clate ADDRESS 
MOV $SSTP(RO) ,SP sRESET STA 
016740 yr ; SUSE UNIEUS, EXERCISER? 
017014 ~ a * LOCK OUT OTHER CPUS FROM PROCEEDING 


000020 170016 #B1T4,QMUBCR2 ;;SET TO POWER FAIL 


sRESETS 
Ae: WAIT 


BR 3$ ‘LOOP 

014200 : $$STP(RO) ,SP ZRESET STACK 
040000 014160 #SW14,@SWR(RO) LOOP ON TEST? 

023220 001343 TST11 ;LOOP TO TST11 


FRO CIO RCIA IAA AA IASI AIS IISISAI SISA II SAIASSASIAI A: 
SRTEST 12 POWER FAIL WITH ODD ADDRESS (SUPERVISOR) 
SOIC OIOICIOICIOIOICIOIIOIOIOIOI IOI UICIOI OI III IT TT TT TT AISI AAAS SISS AIA SS: 
023222 Téri2: 
012777 170740 aye Set 7SET TEST NUMBER 
4 177776 #40000, a#PS 7SET SUPERVISOR MODE 
014702 #3$.ERRTAB(RO) :SET TRAP VECTOR 
#1$.R3 ;SET RETURN ADDRESS FOR POWER FAIL 
016740 UBEF 3 sUSE a whens 


64$ CH | 
017014 a :LOCK OUT OTHER CPUS FROM PROCEEDING 


000020 170016 MBIT4,@AUBCR2 ;;SET TO POWER FAIL 


014200 $: $$STP(RO) SP RESET STACK 

040000 177776 MOV #40000, a4PS SET SUPERVISOR MODE 
000003 a3 CAUSE ODD ADDRESS TRAP 
177776 a4PS Ser KERNAL MODE 
016740 UBEF 7;USE UNIBUS EXERCISER? 


65$ 
000020 #BIT4,QMUBCR2 ;;CLEAR POWER FAIL ENABLE 


;O0DD ADDRESS TRAP FAILED 
014200 : $$STP(RO) ,SP RESET STACK POINTER 
040362 MOV #CPUER, ERRTAB(RO) sRESET 4 
3346 040000 oi}. @SWR(RO) ;LOOP ON TEST? 
023354 001322 TST12° :LOOP TO TST12 





_ /= 


MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30ac053) O6-JUN-79 09:12 PAGE 38 
CEKBGB.P11 O5=JUN-79 09:14 Tle POWER FAIL WITH ODD ADDRESS (SUPERVISOR) SEQ 0052 


FF IIR IR RIERA 
Z*TEST 13 POWER FAIL WITH TIME OUT (SUPERVISOR) 
J TRAE E KR REEEEERERREREREREERERRERREEEREE RK 
023356 1$113: 
012777 170604 MO #13,QDISPLAY §;SET TEST NUMBER 
177776 #40000,a#PS_ — ; SET _ SUPERVISOR MODE 
014702 Hs, ERRTAB(RO) SET TRAP VECTOR 
R3 SET UP RETURN ADDRESS FOR POWER FAIL 
016740 inet USE UNIBUS EXERCISER? 


33 CH IF NO 
017014 we ans ;LOCK OUT OTHER CPUS FROM PROCEEDING 


000020 170016 MBIT4,Q#UBCR2 = ;;SET TO POWER FAIL 


014200 SS$STP(RO),SP |: RESET STACK 
0000 177776 #40000, a#PS ‘SET SUPERVISOR MODE 
173000 RO. af73 3000 ;CAUSE A TIMEOUT 
177776 CL SET KERNAL MODE 
016740 SOEr SUSE UNIBUS EXERCISER? 


65$ 
000020 170016 #BIT4,QMUBCR2 ;;CLEAR POWER FAIL ENABLE 


; TIMEOUT FAILED 
014200 ; $$STP(RO) ,SP 
040362 014702 #CPUER, ERRTAB(RO) 
0000 014160 #SW14,@SWR(RO) ;LOOP ON TEST? 
023510 001322 TST13 ;LOOP TO TST13 


DIORA IOI OI IOI IIOIOIIOIIOIOITIOIOIOIOITIOI IOI IIIT TTT TT IA IAS ASA SAIS SAS ASSIA. 
s*TEST 14 POWER FAIL WITH ODD ADDRESS (USER) 
UII ISI IOI ICICI OIIOIOIOICIOICIOIIOIOIOI IOI TOIT TOT TOT TOT TOTTI IIAISNI SN SAIS IS 
023512 TST14: 
012777 170450 #14,aDISPLAY ;SET TEST NUMBER 
177776 #140000 ,a#PS ;SET USER MODE 
014702 #3$,ERRTAB(RO) ;SET TRAP VECTOR 
#1$,R3 7SET RETURN ADDRESS FOR POWER FAIL 
016740 ‘ UBEF 7;USE UNIBUS EXERCISER? 


64$ : BRANCH IF NO 
017014 we tase ;LOCK OUT OTHER CPUS FROM PROCEEDING 


000020 179016 #BIT4,QM#UBCR2 ;;SET TO POWER FAIL 
014200 $$STP(RO) ,SP RESET STACK 

140000 177776 #140000 ,a#PS SET USER MODE 

000003 } ars :CAUSE ODD ADDRESS TRAP 
177776 CL a4PS SET K 

016740 veer > USE SONIBUS EXERCISER? 
000020 170016 WBIT4,@#UBCR2 ;;CLEAR POWER FAIL ENABLE 


;O0DD ADDRESS TRAP FAILED 
014200 : $$STP(RO) ,SP :RESET SP 





Ce 
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CEKBG8.P11 05-JUN-79 09:14 POWER FAIL WITH ODD ADDRESS (USER) SEQ 0053 
1670 023630 012760 040362 014702 MOV #CPUER,ERRTAB(RO) RESET 4 
1671 023636 032770 040000 014160 BIT #SW14,aSWR(RO) ;LOOP ON TEST? 
1672 023644 001322 BNE TST14 ;LOOP TO TST14 
iene 
1675 DOI ISI III ICICI IOIUIOIIOIUIOIIOIUIOIIIUICIOIIUIOIUIOIIO ITO Rit 
1676 s*TEST 15 POWER FAIL WITH TIME OUT (USER) 
1677 SOI IIIS IOIDISIIIIIIOIIOIUIIIUIOIIDIOIOIIIIOIUICIIOIUIOIOIIUIOIOIOIOIO TIO Tt 
1678 023646 TST15: 
1679 023646 012777 000015 170314 MOV #15,aDISPLAY ;SET TEST NUMBER 
1680 023654 012737 140000 177776 MOV #14 46000, a@FPS SET USER MODE 
1681 023662 012760 023720 014702 MOV #3$,ERRTAB(RO) ;SET TRAP VECTOR 
1682 023670 012703 023760 MOV #1$.R3 ;SET UP RETURN ADDRESS FOR POWER FAIL 
1683 023674 105737 016740 TSTB UBEF + SUSE UNIBUS EXERCISER? 
1684 023700 001407 BEQ 64$ ; BRANCH IF NO 
1685 023702 106237 017014 ASRB UBELCK > LOCK OUT OTHER CPUS FROM PROCEEDING 
1686 023706 103375 BCC 74 
1687 023710 000241 CLC 
1688 023712 052737 000020 170016 BIS WBIT4,@#UBCR2 ;;SET TO POWER FAIL 
1689 023720 64$: 
1690 023720 016006 014200 3$: MOV $SSTP(RO),SP sRESET STACK 
1691 023724 012737 140000 177776 MOV #140000, a4PS ;SET USER MODE 
1692 023732 010037 173000 MOV RO, #173000 :CAUSE A TIMEOUT 
1693 023736 005037 177776 CLR a4FS SET KERNAL MODE 
1694 023742 105737 016740 TSTB UBEF + USE UNIBUS EXERCISER? 
1695 023746 001403 BEQ 65$ 
1696 023750 042737 000020 170016 BIC WBIT4,@4UBCR2 ;;CLEAR POWER FAIL ENABLE 
1697 023756 65$: 
1698 023756 000000 HALT ; TIMEOUT FAILED 
1699 023760 016006 014200 1$: MOV SSSTP(RO),SP SRESET STACK 
1700 023754 012760 040362 014702 MOV #CPUER, ERRTAB(RO) RESET 4 
1701 023772 032770 040000 014160 BIT #SW14, @SWR (RO) ;LOOP ON TEST? 
1702 024000 001322 BNE TST15 ;LOOP TO TST15 
P04 
1705 DIOR RI III IOI IOI IOI TIO III IAI III AIAN ISASASSISISISAIASISASSSISIASS ASCSM 
1706 z*TEST 16 MEMORY MANAGEMENT ABORT TEST 
1707 DDR III IOI IOI IOIUIIIUIOI I IOI IUIIDICIOIOI III IOIUIOIIOIOIDI IODIDE 
1708 024002 TST16: 
1709 024002 012777 000016 170169 MOV #16,aDISPLAY 2SET TEST NUMBER 
1710 024010 005037 177776 CLR aAPs T KERNAL MODE 
1711 024014 012760 004000 014612 MOV #Ti, PFFT(RO) sTIME THIS POWER FAIL 
1712 024022 012760 024122 014702 MOV #4$.ERRTAB(RO) ;SET FOR TIMEOUT 
1713 024030 004737 033142 JSR PC ,MAP [MAP THE WORLD 
1714 024034 012737 024076 000250 MOV #33, AAMMVEC = SET MEMORY MANAGEMENT VECTOR 
1715 024042 012703 024124 MOV #1$,R3 ;LOAD PF RETURN 
1716 024046 005237 177572 INC aMnARO + TURN MEMORY MANAGEMENT ON 
1717 024052 105737 016740 TSTB UBEF ; SUSE UNIBUS EXERCISER? 
1718 024056 001407 BEQ 645% CH IF NO 
1719 106237 017014 ASRB UBELCK > LOCK OUT OTHER CPUS FROM PROCEEDING 
1720 024064 103375 BCC 74 
1721 024066 000241 CLC 
1722 024070 052737 000020 170016 BIS WBIT4,@MUBCR2 ;;SET TO POWER FAIL 
1723 024076 64$: 
1724 024076 016006 014200 3$: MOV $S$STP(RO) SP 3; ZAP STACK 
1725 024102 005237 140000 INC a4140000 zACCESS VIOLATION 


Oz 
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105737 


024122 
024124 


024170 


016740 
000020 


177572 
0 


2 
016737 
035060 


170016 


014702 
014160 
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MORY MANAGEMENT ABORT T 
uast ; USE UNIBUS EXERCISER? 
#BIT4,QMUBCR2 ;;CLEAR POWER FAIL ENABLE 
NO VIOLATION OR TRAP TO 4 
aAMARO ; TURN OFF stare MANAGEMENT 
$$STP(RO) ,SP 


ACPUER, ERRTAB( 
#SW14,,ASWR(RO) 
TST16 


:MP MODE? 
BRANCH IF YES 
;UUMP INTO EOP 


: TST16 
CLEAR fe DISPLAY REGISTER. 


SEQ 0054 
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SEQ 0055 
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CEKBGB.P11 O5-JUN=79 09:14 716 MEMORY MANAGEMENT ABORT TEST 


FUROR IORI IOIOIOIOIOIOIOIOIC TOSCO TOR IOS OOO IOS IIIA SISASASAS IIASA SIASAISI ISI ISIAAAAASAS AAA: 
RRR IOI IOI IOI IOIIOIOIOIOIOIOIOIOIOIOIOIOIUIOIOIO SOTO SOIR IOS IIAAISAA SA SAS AAAS AAAI AAAI ASI ASI AAASICACA 
DOI III IOI IOI OK KEKE EEE ee 
peaakkcekankencie SEC TI] ON TWO REKKKER REE 
IIIT III TOTTI OK KREKKE EEE 
ROR IOIIOIOIOIOIOIOIOIO IOI IOI SOAS AISA AISI AAAI ISAAC ISIN IIA IIASA IAA AA AAI ASN ASIA IAA ASAE 
OGIO IOI IOI IOI IOIIOIOIOICIOIOIOIOIOIOIOIOIOIOIOIIOI IOI OTITIS IAAIAASIASA IAAI AAA ASIAAAN AA. 


SEQ 0056 


ne 
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CEKBGB.P11  05=JUN=79 09:14 SECTION 2 INITIALIZATION SEQ 0057 
1766 .SBTTL SECTION 2 INITIALIZATION 

1767 024170 012703 024214 SEC2: MOV #1$, R3 ;SET UP POWER FAIL RETURN IN CASE 
1768 024174 106237 016770 ASRBSYNC.3 CONTROL THE ENTRY 

1769 024200 103373 BCC —- SEC? : 

1770 024202 005237 016716 INC —-S2L0G1 ;LOG INTO SEC2 

1771 024206 012737 000001 016770 MOV #1, —_—_SYNC.3 ZLET THE OTHERS IN 

1772 024214 023737 016716 016766 1$: CMP —-S2L.0G7,, CPUACT ::WAIT FOR EVERYONE TO GET ... 
1773 024222 001374 BNE —s:«1$ 

1774 024224 005700 TST RO Hs THIS THE MASTER? 

1775 024226 001002 BNE -3$ ;:BRANCH IF NO ™ 

1776 024230 104401 041420 TYPE TM15 i" ENTERING SECTION 2 

1777 024234 3$: 

1778 024234 052777 100000 172560 BIS #B1T15, @ACR s INITIALIZE IIST 

1779 024242 016006 014200 MOV. —- $$STPRO), sP :SET THE STACK 

1780 024246 106237 017020 2$: ASRB S2L1 33 TRY TO ENTER SECTION 2 INITIALIZATION 
1781 024252 103375 Bcc OS 

1782 024254 012737 034220 000024 MOV  - #SPOWER, a24 ;;SET NEW POWER FAIL HANDLER 

1783 024262 012737 000340 000026 MOV —- #340, a4 26 

1784 024270 017705 172526 MOV @ACR, = RS : COPY ACR 

1785 024274 072527 177770 ASH  #=10, RS GET THE ID 

1786 024300 010560 014240 MOV R5, $REGO(RO) ; IDENTIFY CPU = ERROR TYPE-OUT 

1787 024304 005002 CLR oR ;RESET FOR COUN 

1788 024306 026205 014226 65$: CMP $CPUID(R2),R5 ;SID MATCH? 

1789 024312 001404 BEQ 64S 

1790 024314 005722 TST —-(R2)+ ; INCREMENT R2 BY 2 

1791 024316 020227 000010 CMP = R2, #10 

1792 024322 002771 BLT 658 

17S3 024324 010200 64$: MOV R2,R0 ;MOV LOGICAL ID TO 2ND OPERAND 

1794 024326 010001 Mov RO, Ri ;SET UP RI 

1795 30 006201 ASR sR 

1796 024332 012760 034412 014662 MOV AHSPWRDN, PWRTAB(RO) ;SET UP FOR POWER DOWN 
1797 024340 012760 024634 014702 SIZMBS: MOV #NORP ,ERRTAB(RO) 3saeT UP" CPU ERROR VECTOR IN CASE 
1798 ; : THERE'S NO RPO/5/6 

1799 024346 052737 000040 176710 BIS #BITS ,@#RECS2 ; INIT. RP CONTROLLER, IF THERE. 
1800 024354 012760 040362 014702 MOV —- ACPUER, ERRTAB(RO} ;:RESET ERROR VECTOR 

1801 024362 005002 CLR sR? : 3RESET_ COUNTER 

1802 024364 010237 176710 RPSRC: MOV —-R2, @ARPCS2 SET DRIVE # IN CS REG. 

1803 024370 032737 040000 176712 BIT #BIT14,aaRPDS Z1S THE DRIVE UP? 

Hse 024376 001024 BNE NXTDRV + BRANCH tF IT ISN'T 

1806 024400 032737 001000 176712 BIT #BIT9,a4RPDS 3771S THE PGM BIT SET FOR THIS DRIVE 
1807 024406 001403 BeOS 

1808 024410 005260 016742 INC RPPGM(RO) ::YES, FLAG THE CONDITION 

1809 024414 000415 BR NXTDRV AND; SEARCH FOR ANOTHER, DRIVE 
1810 024416 032737 000400 176712 1$: BIT  #BIT8,@#RPDS ::1S THIS PORT IN CONTROL? 

1811 024424 001411 BEQ  ——NXTDRV NO, LOOK. FOR ANOTHER 

1812 024426 005060 014632 CLR MBDSW(RO) ZCLEAR MASSBUSS DEVICE SELECTION 
1813 024432 013703 176710 MOV  — @#RPCS2,R3 COPY CS2 

1814 024436 042703 177770 BIC -#177770.R3 ZiGET RID OF OTHER INFO 

1815 024442 110360 014632 MOVB —-R3, MBDSW(RO) ::WRITE DRIVE 1D INTO SELECTION w 
1816 024446 000454 BR S12END : :DEVICE HAS BEEN FOUND. 

1817 024450 005202 NXTDRV: INC —-R2 :INEXT DRIVE 

1818 026452 020227 000010 (MP «RO, #10 SEAL DRIVES TESTED? 

1819 024456 103742 BLO —aRPSRC TEST SOME MORE. 

1820 024460 005760 016742 TST RPPGM(RO) i ANY PROGRAMMABLE DRIVES? 

1821 024464 001011 BNE A YES. 
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05-JUN-79 09:14 SECTION 2 INITIALIZATION SEQ 0058 
1822 024466 104401 041533 NORH70: TYPE T™101 :"NO MASSBUS DEVICE AVAILABLE ON CPU 
1823 024472 016046 014226 Mov — $CPUID(RO) ,=(SP) AVE $CPUID(RO) FOR TYPEOUT 
1824 024476 104405 TYPDS ::60 TyPE==DECIMAL ASCII WITH SIGN 
1825 024500 012760 001400 014632 MOV #1400, MBDSW(RO) SET CODE FOR NO DEVICE 
1826 024506 000434 BR SIZEND SIEMIT SECTION 2 INITIALIZATION 
1827 024510 005002 A: CLR = R2 SIRESET COUNTER 
1828 024512 010237 176710 10$: MOV —- R2, a#RPCS2 IACCESS DRIVE. 
1829 024516 032737 001000 176712 BIT aI T9 AARPDS :PGM BIT SET? 
1830 024524 001005 BNE 15$ :IYES, FOUND. ONE 
1831 024526 005202 INC R2 INO, NEXT DRIVE 
1832 024530 020227 000010 (MP «RO, #10 iALL DRIVE TESTED 
1833 024534 103766 BLO —-—«'i10$ NO. 
1834 024536 000000 HALT YES. 
1835 024540 110260 014632 15$:  MOVB —R2, MBDSW(RO) SISET DRIVE # 
1836 024544 052760 001000 014632 BIS  #BIT9 ,MBDSW(RO) :ISET PGMBIT 
1837 024552 104401 043535 TYPE ,$PGM1 3s TYPE SHARED DRIVE WARNING MSG 
1838 024556 010246 Mov —s- R, -(SP) 
1839 024560 104405 TYPDS 
1840 024562 104401 043563 TYPE —_, $PGM2 
1841 024566 016046 014226 Mov.  $CPUID(RO), -(SP) 
1842 024572 104405 : TYPDS 
1843 024574 104401 043577 TYPE —_, SPGM3 
1844 024600 012737 000001 017020 SIZEND: MOV.  #1,S2L1 ::ALLOW ENTRY INTO SEC. 2 
1845 024606 005237 016720 INC S2L0G2 :iLOG OUT OF SECTION 2 INITIALIZATION 
1846 024612 023737 016766 016720 18: (MP —s- CPUACT, S2L.062 :WAIT FOR ALL THE CPUS TO GET HERE 
1847 024620 0601374 BNE i$ 
1848 024622 012777 040334 172176 MOV = #ISTDIS, @ISTVEC POINT TO DISPATCHER 
1849 024630 000157 024644 JMP TST17 START THE TEST 
1851 024634 000240 NORP: NOP ; THERE IS NO RP CONTROLLER 
1852 024636 012716 024466 MOV #NORH70, (SP) 7zSET FOR TEST ENTRY RETURN 
1853 024642 000002 RTI > IRETURN 
1854 
1855 
1856 
1857 


“De 
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CEKBGB.P11 O5-JUN-79 09:14 117 CHECK ‘BRK* & "DCF* FLAGS DURING POWERFAIL SEQ 0059 


1859 5 REE ERE RER e 
DATEST 17 CHECK "BRK* & "DCF" FLAGS DURING POWERFAIL 
TSE IIIDIIUIIIISIISIIIIOIOIUISIUIIIUIOIIOIIUIOIIUIOIOIUIUIUIOIIO ini iin tet t 

024644 18117: 

024644 000017 167316 MOV #17 ,QDISPLAY ;SET TEST NUMBER 


PLR TSI7A=FORK «8 & ee Ree RKR eee 


024652 016006 014200 MOV $$STP(RO), SP;SET UP THE STACK 
024656 100000 172136 #B1Ti5, @ACR INITIALIZE THE IIST 
os cess 000122 708: ages ENTER CONTROL FORK 


0$ 
024672 000110 016766 MP a67$,CPUACT HAVE WE REACHED THE END OF THE 
;ROUTING’ CYCLE? 
;BRANCH IF NO 


FRRRESRES 


- 


a al ed cd a a a ed a cl 
Co 

33 

ad 


65$ 
016766 Ste T,R2 


R2 3 (CPUACT=1) *2 
000072 °F ee sARE WE AT THE END OF THE TEST? 


;BRANCH IF NO 
000064 sEXIT 


000050 : #2 ; INCREMENT 68$ BY 2 

000042 ;CLEAR THE CHECKPOINT COUNTER 
000036 : ; INCREMENT laa 

014714 . ;CLEAR THE LOCK 

000030 :ROUTE emai THROUGH 1S17A? 


; BRANCH 
000001 000022 CLEAR LOCK 
025014 ; JUMP TO BRANCH TSi7A 
000001 000010 : [CLEAR LOCK 
025136 TS17B ;JUMP TO TS17B 


Perreeittt tite t iti titi ii iit t titi itt titi titi iii t titi tit T 


016724 
025012 016776 


025014 112761 000017 TS17A: #17, $TSTNM(R1) 7SET UP THE TEST NUMBER 
010037 017054 MO RO,PUT SET PROCESSOR UNDER TEST 
RO 71S THIS THE MASTER? 
BN 5$ :BRANCH IF NC 
041476 ,1M77 ; test" 


~(SP) 
014002 MOVB STSTNM(R1),(SP) ;GET THE TEST NO. 
2 TYPE 2 DIGITS, NO LEADING 0 


041507 ™100 :" POWER FAIL CPU a’ 
014226 MO $CPUID(RO) ,-(SP) SAVE $CPUID(RO) FOR TYPEQUT 
meses ::GO TYPE--DECIMAL ASCII WITH SIGN 


, SCRLF 
014020 014612 #SSU!TI'NCX,PFFT (RO) 7SEND SIG. ON UP, TIME, DON'T SAVE MM 
025124 014672 #BAD , 1STTAB(RO) +h UP TIST VECTOR FOR THIS CPU. 
R3 ;RETURN AFTER THE WAIT ON POWER UP 
0251 014642 SIGNAL CLEAR THE POWER UP SIGNAL 
025110 012737 177777 014712 @1, SYNC.1 UNLOCK THE OTHER CPUS 


000001 
025362 
000002 


BESRS2 


3 
hwWN-O 


g 


00000 
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025116 
025120 


025124 
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000001 
000137 
104025 
000000 
012716 
000002 


112761 
106237 


052777 
012777 


024644 


024644 
000017 
014712 
014220 
025124 
000001 
000004 
000007 
171612 
025264 
014642 
171570 
000000 


171556 
171550 


024644 


000007 
017054 
014226 
000401 


171504 
014250 
014260 
017004 
044746 
014712 


024644 
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CHECK "BRK' & "DCF" FLAGS DURING POWERFAI SEQ 0060 

:WAIT FOR THE POWER TO FAIL. 

TST17 :GO TO CONTROL FORK 

25 ;UNEXPECTED CPU INTERRUPT 

#TSTI7, (SP) sCONTINUE TESTING 

#17, $TSTNM(R1) :SET UP THE TEST NUMBER 

SYNC.1 :WAIT FOR P.U. r. TO SEND SIGNAL 

TS17B :LOOP UNTIL SENT 

, $SNULL “FLUSH THE TYPE QUEUE 

WBAD, ISTTAB(RO) :GET SET FOR BAD INTERRUPT 

#PGCS,@ACR sACCESS PGCS REGISTER 

#B1T2,aADR ‘SET THE INTERRUPT ENABLE BIT 

#DCF ,@ACR 5} :COPY THE DCF REG. 


@ADR,R5 ; INTO R 
#STS17, ISTTABCRO) ;SET FOR EXPECTED INTERRUPT 
SIGNAL WAIT ON POWER FAIL SIGNAL 


1$ 
aACR, — SAVE T HE ACR 

#PGT ACCESS THE PGTE REG. 
@ADR, $REGO (RO) “SAVE THE PGTE REG. 
@ADR,$REG3(RO) ;SAVE THE PGCS REG. 
20 [NO IIST INTERRUPT 
TST17 ;DO0 IT AGAIN 


#DCF ,@ACR ZACCESS DCF REGISTER 
PUT .R3 *GET LOGICAL ID INTO R3 

SCPUID(R3).R4  :COPY list ID TO DESTINATION. 

#401,R3 [MAKE A MASK 

R4,R ‘BRING IT INTO POSITION 

R3._R5 ‘RS IS WHAT THE DCF REG. SHOULD LOOK LIKE 
R3. “DELAY A SHORT WHILE 

@ADR,R2 :COPY DCF REGISTER 

Re RS s EVERYTHING OK? 


‘BRAN 
22, $REG1(RO) ;THE DCF REG. ; 
R5,$REG2(RO) ;WHAT IT SHOULD BE 


21 ; INCORRECT DCF REG. BITS 
NOPRMP (RO) 

.7M111 ; INTERRUPT AS EXPECTED 
SYNC.1 WAIT FOR POWER-UP 


4$ 
MTST17, (SP) ; CONT INUE 
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CEKBGB.P11 O5-JUN-79 09:14 T20 CHECK POWERFAIL DURING HIGH MEMORY ACTIVITY 
1963 DOI IOI III III III IOI IIIOIICISIOIIIINIIUIIUIIIIIIOIIIUIIOI IO ttt 
s*TEST 20 CHECK POWERFAIL DURING HIGH MEMORY ACTIVITY 
1965 ZSUIU IS UIIISISIIIISIIIIIISIINIIISISI IOI IUOIDIDIIIOIUIIIIUISIOIOIUIUISIIOI RII ttt 
1966 025362 TST20: 
1967 025362 012777 000020 166600 MOV #20,aDISPLAY ;SET TEST NUMBER 
1968 ppxeeeeaneeeankiet TSO0ASFORK teak eee eee eee eee eee 
1969 
1970 025370 016006 014200 MOV $$STP(RO), SP;SET UP THE STACK 
1971 025374 052777 100000 171420 BIS #BIT15, @ACR : INITIALIZE THE [IST 
1972 025402 106277 000122 70$: ASRB a69$ sENTER CONTROL FORK 
1973 025406 103375 BCC 70$ 
1974 025410 027737 000110 016766 CMP a67$,CPUACT sHAVE WE REACHED THE END OF THE 
1975 :ROUTING: CYCLE? 
1976 025416 001021 BNE 65$ : BRANCH IF NO 
1977 025420 013702 016766 MOV CPUACT,R2 
1978 025424 005302 DEC R2 
1979 025426 006302 e ASL R2 3 (CPUACT=1) *2 
1980 025430 027702 000072 CMP a68$,R2 TARE WE AT Ley END OF THE TEST? 
1981 025434 001005 BNE 64$ ;BRANCH IF NO 
1982 025436 012777 000001 000064 MOV #1, a69$ EXIT 
1983 025444 000137 025704 JMP TST21 
1984 025450 062777 000002 000050 64$: ADD #2 a68$ ; INCREMENT 68$ BY 2 
1985 025456 005077 000042 CLR a67$ :CLEAR THE CHECKPOINT COUNTER 
1986 025462 005277 000036 65$: INC a67$ sah CHECKPOINT 
1987 025466 005037 014714 CLR SYNC.2 -CLEAR T HE LOCK 
1988 025472 020077 000030 CMP RO, a68$ ;ROUTE THIS PROCESSOR THROUGH TS20A? 
1989 025476 001005 BNE 66$ “BRANCH IF NO 
1990 025500 012777 000001 000022 MOV #1 ,a69$% ; CLEAR LOCK 
1991 025506 000137 025532 JMP TS20A ; JUMP TO BRANCH TS20A 
1992 025512 012777 000001 000010 66$: MOV #1, a69$ :CLEAR LOCK 
1993 025520 000137 025634 JMP TS20B ; JUMP TO TS20B 
1994 PETTITT ttt TTT ttt ttt ttt itt ttt ttt i titi titi iti iit 
1995 025524 016726 67$: D1 
1996 025526 016730 68$: D2 
1997 025530 017 69$: D3 
1998 025532 112761 000020 014002 TS20A: MOVB #20, STSTNM(R1) 
1999 025540 010037 017054 MOV RO,PUT ;SET PROCESSOR UNDER TEST 
2000 025544 005700 TST RO 71S THIS THE MASTER 
2001 025546 001007 BNE 5$ ‘BRANCH IF NO 
2002 025550 104401 041476 TYPE ~1M77 ;‘ TEST’ 
2003 025554 005046 CLR -(SP) 
025556 116116 014002 MOVB STSTNM(R1),(SP) ;GET THE TEST NO. 
2005 025562 104403 TYPOS 
2006 64 000002 . WORD 2 sTYPE 2 DIGITS, NO LEADING 0 
2007 025566 5$: 
2008 025566 104401 041507 TYPE ~™™100 :' POWER FAIL CPU # ** 
2009 025572 016046 014226 MOV $CPUID(RO) ,-( SP) sSAVE SCPUID(RO) FOR TYPEOUT 
2010 025576 104405 TYPDS 3:60 TYPE=-DECIMAL ASCII WITH SIGN 
2011 025600 104401 014333 TYPE SCRLF 
2012 025604 012760 014020 014612 MOV ASSU'TI'NCX,PFFT(RO) ;SEND SIGNAL ON UP,TIME,DON'T SAVE NN 
2013 025612 005003 CLR R3 SET FOR RTI RETURN 
2014 025614 005037 014642 CLR SIGNAL :CLEAR THE POWER-UP SIGNAL 
2015 025620 012737 177777 014712 MOV #-1, SYNC.1 : UNLOCK THE OTHER CPUS 
2016 025626 000001 WAIT WAIT FOR THE POWER TO FAIL 
at 025630 000137 025362 JMP TST20 


nae 
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05=JUN-79 09:1 
112761 000020 014002 TS20B: MOVB 
06237 014712 ASRB 
103372 BCC 
04401 014220 TYPE 
012705 002000 1$: MOV 
011010 2$: MOV 
011010 MOV 
011010 MOV 
011010 MOV 
077505 SOB 
106237 014642 ASRB 
103366 BCC 
000137 025362 JMP 
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T20 CHECK POWERFAIL DURING HIGH MEMORY ACTIVITY SEQ 0062 


7 1 phage? i’ UP THE TEST NUMBER 


NC T FOR SYNC. SIGNAL 
TS20B 
» SNULL FLUSH THE TYPE QUEUE 
#2000,R5 : INITIALIZE COUNTER 
(RO), (RO) 

0), 
(RO), (RO) 
(RO) , (RO) 
R5,2$ 
S1GNAL SIGNAL RECEIVED? 
+120 3NO,CONTINUE WITH CONTENSION 
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012777 


027737 


001021 
013702 
005302 
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09:14 T21 CHECK POWERFAIL SEQUENCE DURING MASSBUS XFER SEQ 0063 
DAI IIIS III IUIIIUISIISISIOIIIIIIIIUISIIIIOIUIOIIUIIIOI IO oi tot 
:*TEST 21 CHECK POWERFAIL SEQUENCE DURING MASSBUS XFER 
ZS O I IISISIIIIISISISIIOIOIOIIOIIIOIOI IIT ITT OT TTT TTT TTT TOTTI ITE 
TST21: 
000021 166256 MOV #21,QDISPLAY ;SET TEST NUMBER 
DLR KI TSZ1TASFORK Kee RRR ERE Re 
014200 MOV $$STP(RO), SP;SET UP THE STACK 
100000 171076 BIS #BIT15, @ACR sINITIALIZE THE IIST 
000122 70$: ae ae sENTER CONTRC« © ORK 
000110 016766 CMP @67$,CPUACT sHAVE WE REACHED THE END OF THE 
;ROUTING CYCLE? 
BNE 65$ ;BRANCH IF NO 
016766 MOV CPUACT ,R2 
DEC R2 
ASL 3 (CPUACT=1) *2 
000072 CMP a68$,R2 z;ARE WE AT THE END OF THE TEST? 
BNE 64$ c, CH IF NO 
000001 000064 MOV #1, a69$ sEXIT 
026632 JMP TST22 
000002 000050 64$: ADD 2 a68$ : INCREMENT 68$ BY 2 
000042 CLR a67$ ;CLEAR THE CHECKPOINT COUNTER 
000036 65$: INC a67$ tare C* eiel 
014714 CLR SYNC .2 ROUTE THE LOCK 
CMP RO, a68$ 08 THIS PROCESSOR THROUGH TS21A? 
BNE $ : H IF NO 
000022 MOV #1, a69$ CLEAR LOCK 
026054 JMP TS21A ; JUMP TO BRANCH TS21A 
000010 66$: MOV #1,a69$ ; CLEAR LOCK 
026434 JMP TS21B : JUMP TO TS21B 
TOISAS IIR RTO IOIIOIOIOICI CI IOIIOIOIOIOIOIDIIOI IIIT III TO TI II 
67$: E1 
68$: E2 
69$: E3 
000021 014002 TS21A: MOVB #21, STSTNM(R1) 
017054 MOV RO, ;SET PROCESSOR UNDER TEST 
016732 016766 4$: a fhe CPUACT ‘LET THE OTHER CPUS CATCH UP 
TST RO 71S THIS THE MASTER? 
BNE 5$ ; BRANCH IF NO 
041476 TYPE ~1M77 3’ TEST’ 
CLR -(SP) 
014002 ote STSTNM(R1),(SP) ;GET THE TEST NO. 
5$ «WORD 2 ;TYPE 2 DIGITS, NO LEADING 0 
016766 ong ac R2 7CHECK FOR MASSBUS DEVICES ON OTHER CPUS 
CLR R5 
1$: CMP R2, R5 
BEQ 2$ 
001400 014632 CMP #1400, MBDSW(RS) 
BNE 3$ 
000002 





MAINDEC-11-CEKBG-8 ae 74 SYSTEM POWER FAIL MACY11 30a(1053) O6-JUN-79 09: ie _ 50 


CEKBGB.P11 - 05=JUN-79 09:1 121 CHECK POWERFAIL SEQUENCE DURING MASSBUS XFE SEQ 0064 
2088 026152 104401 043732 2$: TYPE ;THERE ARE NO DEVICES TO TEST THIS CPU 
2089 026156 016046 014226 MOV SCpUID (RO), -(SP)° AVE $CPUID(RO) FOR TYPEOUT 
2090 026162 104405 TYPDS 2:60 TYPES DECIMAL ASCII WITH SIGN 
2091 026164 104401 014333 TYPE  ,$CRLF ' 
2092 026170 104401 041604 TYPE  TM102 "PROCEEDING TO NEXT CPU’ 
2093 026174 012737 177777 014714 MOV h-1 SYNC.2 
2094 026202 000640 BR TST21 :BRANCH TO START OF TEST 
2095 026204 020005 3$: CMP RO, RS 
20% 626206 001003 BNE P2} :BRANCH IF iHERE IS A DEVICE ON ANOTHER CPU 
2097 026210 062705 000002 ADD #2, R5 ‘THE DEVICE IS ON THIS CPU 
2098 026214 000745 BR 1s # 
2099 026216 104401 041507 P21: ‘TYPE ™100 :"POWER FAIL CPU # 
2100 026222 016046 014226 MOV $CPUID(RO), -(SP)° sSAVE SCPUID(RO) FOR TYPEOUT 
2101 026226 104405 TYPDS ::G0 TYPE=-DECIMAL ASCII WITH SIGN 
2102 026230 104401 014333 TYPE  ,$CRL 
2103 026234 012760 014020 014612 MOV BSSUITIINCX, PFFT(RO) ;SEND SIGNAL ON UP TIME, DON'T SAVE NN 
2104 026242 012737 177777 014712 MOV #-1,  SYNC.1  ;UNLOCK THE OTHER CPU'S 
2105 026250 005037 014642 CLR SIGNAL *CLEAR THE POWERUP SIGNAL 
2106 026254 005003 CLR R3 [COME UP VIA RTI 
2107 026256 022760 001400 014632 CMP #1400,MBDSW(RO) :DOES THIS CPU HAVE A MASSBUS DEVICE? 
2108 026264 001006 BNE 1$ SBRANCH IF YES 
2109 026266 000001 WAIT s;WAIT FOR POWER TO FAIL 
2110 026270 012737 177777 014714 MOV #-1 SYNC.2 :UNLOCK CPUS IF ANY ARE LOCKED 
2111 026276 000137 025704 JMP TST21 :GO TO CONTROL FORK 
2112 026302 016004 017034 1$: MOV BFADR(RO) ,R4S PUT ADDRESS OF BUFFER IN R4& 
2113 026306 012737 000070 176700 MOV #70, @4RPCS1 ;D0 A READ 
2114 026314 004737 033274 JSR PC ,MBUSR READ A RECORD 
2115 026320 005060 014650 CLR CKSUM(RO) CLEAR CHE CKSUM LOCATION 
2116 026324 012702 004000 MOV #4000,R2 S INITIALIZE A COUNTER 
2117 026330 016004 017034 MOV BFADR(RO).R4  :GET BUFFER POINTER 
2118 026334 062460 014650 2$: ADD (R4)+, CKSUM(RO) “PER FORM 
2119 026340 005560 014650 ADC CKSUM(RO) : CHECKSUM 
2120 026344 077205 SOB R2,2$ SLOOP 
2121 026346 616004 017034 4$: MOV BFADR(RO),R4 §§ :LOAD BUFFER ADDRESS 
2122 026352 012737 000050 176700 MOV #50,a4RPCS1 *DO A WRITE CHECK 
2123 026360 004737 033274 JSR PC ,MBUSR SREAD FROM MASS BUS DEVICE 
2125 026364 005005 CLR R5 ZCLEAR RS 
2126 026366 012702 004000 MOV #4000,R2 S INITIALIZE COUNTER 
2127 026372 016004 017034 MOV BFADR(RO).R4  :GET POINTER TO BUFFER 
2128 026376 062405 5$: ADD (R4)+,R5 PERF OAM 
2129 026400 005505 ADC RS ; CHECKSUM 
2130 026402 077203 SOB R2,5$ 
2131 026404 020560 014650 CMP R5,CKSUM(RO) EVERYTHING OK? 
2132 026410 001401 BEQ 6$ CH IF YES 
2133 026412 104023 ERROR 23 3 CHECKSUM IS WRONG ! 
2134 026414 106237 014642 6$: ASRB — SIGNAL  » 
2135 026420 103352 BCC 4$ “NO CONTINUE XFERS Lary 
2136 026422 012737 177777 014714 MOV #-1,SYNC.2 “UNLICK CPUS IF ANY ARE LOCKED x 
2137 026430 000137 025704 JMP TST21 "GO TO CONTROL FORK ey 
2138 026434 112761 000021 014002 1S21B: MOVB #21 $TSTNM(R1) 7SET THE TEST NUMBER 
2139 026442 022760 001400 014632 CMP #1400, MBDSW(RO) “DOES THIS CPU HAVE A MASSBUS DEVICE? 
2140 026450 001007 BNE 1$ CH IF YES 
2141 026452 106237 014714 10$:  ASRB = SYNC.2 “ELSE SET OUT THIS ROUND 


; 
2143 026460 104401 014220 TYPE » SNULL FLUSH THE TYPE QUEUE 
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000137 
6004 
012737 
737 


060 
012703 
6004 
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025704 
017034 
0000 


014650 
014712 
014220 
017034 


000050 
033274 


004000 
017034 
014650 
014642 


014220 
025704 


176700 


176700 


1$: 


2$: 


7$: 


4$: 


5$: 


6$: 


‘ 
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CHECK POWERFAIL SEQUENCE DURING MASSBUS XFE 


JMP 


TST21 

BFADR(RO) ,R4 

#70, aA#RPCS1 
PC ,MBUSR 
CKSUM(RO) 
#4000 ,R3 

BFADR(RO) ,R4 
CKS 

R5, 

SYNC.1 

7$ 

, SNULL 

BFADR(RO) ,R4 

#50 ,aARPCS1 
PC ,MBUSR 

R5 

#4000,R3 

BFADR(RO) .R4 
(R4)+,R5 
R3,5$ 
R5,CKSUM(RO) 
6$ 

23 

SIGNAL 

4$ 


. SNULL 
TST21 


(R4) +, CKSUM(RO) 
UM(RO) 


; JUMP INTO THE CONTROL LOOP 


;PUT ADDRESS OF BUFFER IN R4 
:DO A READ 
READ A RECORD 
CLEAR CHECKSUM LOCATION 
S INITIALIZE A COUNTER 
GET BUFFER POINTER 


PERFORM... 
; CHECKSUM, 


FLUSH THE QUEUE 
;LOAD BUFFER ADDRESS 
:DO A WRITE CHECK 
READ FROM MASS BUS DEVICE 
CLEAR R5 
INITIALIZE COUNTER 
+ POINTER TO BUFFER 
RFORM. . 
CHECKSUM 
sEVERYTHING OK? 
BRANCH IF YES 
CHECKSUM IS WRONG 
:NO CONTINUE XFERS 
; JUMP INTO CONTROL LOOP 


SEQ 0065 


8 6 
MA INDE C-11-CEKBG-8 Na 74 SYSTEM POWER FAIL MACY11 30A(1052) O06-JUN-79 09:12 PAGE 52 
CEKBGB.P11 05-JUN-79 09:1 T22 CHECK AC POWERFAIL ON MEM BOXES, PORTS DISABLED 


5 FARRAR EERE REEEREREERREEREREREKRRERERERRERRRERRRRRRREREEE 
s*TEST 22 CHECK AC POWERFAIL ON MEM BOXES, PORTS DISABLED 
J FERRER EEEEERREREREREEEREREEKREREEERREERERRERREREERREER ERE 
TST22: 

012777 000022 165330 MO #22, aDISPLAY ;SET TEST NUMBER 


112761 000022 014002 MOVB #22, STSTNM(R1) SET THE TEST NUMBER 
106237 016770 23: SYNC .3 CONTROL THE ENTRY 


2 
014542 ENTR22 ; INCREMENT ENTER FLAG 
000001 016770 #1, SYNC .3 ZALLOW THE OTHERS IN 
016766 014542 : vale ENTR22 ARE ALL CPUS HERE? 


YET 
014540 CLEAR THE EXIT FLAG 
177776 :SET_KERNAL MODE 
000000 71S THIS THe MASTER? 


BRANCH IF 
026714 0004 ;THIS IS THE MASTER 


026716 100000 170076 : 15, @ACR : INITIALIZE THE IIST 
000022 165236 MO #2 @DISPLAY SET TEST NUMBER 
01 re RO SP zs INITIALIZE THE STACK 
014612 (R “ SPECIFY THE POWER FAIL 
040362 014702 SET FOR UNEXPECTED TRAPS TO 4 
027062 100$,° R3 :SET FOR POWER FAIL RETURN 
014540 XIT [FINISHED WITH THIS TEST? 

$ BRANCH NO 


H IF 
177572 MMRO SMAKE SURE MM IS TURNED OFF 
:GO TO NEXT TEST 
3 TIME TO RELOCATE? 
CH IF NO 


I 
:GET READY FOR RELOCATION 


a 


NMoNMNoNMoNoMNoNnofnnofenoefnor 
ek ee dd ad ad od od 8 
VILSSELRALATLSS 


172340 

172342 

172344 

177572 #1 MMRO SLAVE IS NOW IN HIGH CORE 
= CLEAR RELOCATION FLAG 
; CONTINUE TESTING 


BR $22B 
014536 : STIME TO RELOCATE? 
TS22B [BRANCH IF NO 
177572 MMRO ;RETURN TO LOW CORE 
014536 ;CLEAR THE FLAG 
BR TS22B ONT INUE 


014522 : PWRFL SHOULD WE BE HERE? 
BN’ BRANCH IF YES 
UNEXPECTED CPU POWER FAIL 
BR TS CONTINUE TESTING 
017004 : (R [WANT TO IDENTIFY ie CPU 
041635 T P SEXPECTED CPU POWER FAIL 
B T CONTINUE TESTING 


005700 "7 :IS THIS THE MASTER? 





a2 
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012737 


C 6 
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041476 
014002 


000000 


000000 
032076 
014540 


027654 
00001 


000001 
027654 
014502 
000002 
000001 
014526 
032576 


014526 
020000 


014522 
014526 


167626 
164766 


014702 


000170 
014540 


014532 
014534 
172340 
172342 
172344 
177572 


000000 


5$ 
,™M77 


~(SP) 
STSTNM(R1), (SP) 
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CHECK AC POWERFAIL ON MEM BOXES, PORTS DISABLED 


:BRANCH IF NO 


PWRFL 
BOOT 
MEMS IZ 


R2 
5. @ACR 
2 @DISPLAY 
P(RO) SP 


T(RO) 
«Benn. ERRTAB(RO) 


3$ 
& 


a 
#1, 
TST23 
START (R2) 
10$ 


#100$, 


112, 
0 


BOOT 
12$ 
#20000, a#0 


a#110 
EXIT 


BUF CLR 


-(SP) 


R3 


s Test” 


GET THE TEST NO. 
;TYPE 2 DIGITS, NO LEADING 0 


SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 
; SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND | 
SFIND ALL THE MEM BOXES 

[WAS ONLY ONE MEM BOX FOUND? 


[BRANCH IF NO 
sWE CAN'T DO THIS TEST 
;POINT TO BOX #7 

os THE IIST 

[SET THE TEST NUMBER 

: INIALIZE_THE son's 

7SPECIFY THE POWER FAIL 

7SET FOR UNEXPECTED TRAPS TO 4 
DID WE Bae THE BOXES 


BRANCH 

sRESTORE LOC 110 
RESTORE LOC 0 
:SI THE SLAVES EXIT 

:GO TO THE NEXT TEST 

[WHAT DO WE KNOW ABOUT THIS BOX? 

BRANCH IF NOT THE BASE BOX 

BRANCH IF ITS THE BASE BOX 

Tie NO BOX-POINT TO THE NEXT LOWER BOX 


:WAS THERE ONLY ONE MEM BOX? 

BRANCH IF YES 

:IS THIS THE DC TEST? 

BRANCH IF YES 

:TO TEST THE BASE BOX, 

[RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 
[TURN MM ON ON POWER-UP 


7SIGNAL SLAVES TO RELOCATE 
[GET READY TO GO TO HIGH CORE 


WE ARE NOW IN HIGH CORE 


:SET_TO WRITE PATTERN 

WRITE THE PATTERN 

;CLEAR THE KEYBOARD BUFFER 

; TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 


4 iy THE CONDITIONS 
;SET_UP THE POWER FAIL RETURN 
71S THIS THE DC TEST? 

;BRANCH IF NO 

ZMAKE BOOTING SLAVE SP=20000 
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027550 
027552 


057650 


000110 
164550 


032762 


164532 
014522 


047036 


164454 
177760 
000000 


167302 
000001 


000001 
000003 


014522 


017004 
041635 
000001 


032434 
000001 
032722 
000001 
177572 
014532 


000002 
027166 


167356 


167304 
016766 
167264 
167254 


014530 
177572 


014536 


12$: 


17$: 


18$: 
14$: 


15$: 


100$: 


101$: 


102$: 
103$: 


104$: 


a#110 
a$TKS 
13$ 
#MENTR, 
14$ 


a$TKS 


dD 6 
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@iSTVEC 


RELOLO 
RELODN 
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CHECK AC POWERFAIL ON MEM BOXES, PORTS DISABLED 


HANG THE SLAVES BOOT 
71S CHARACTER IN BUFFER? 


; LOOP 
;SET UP TO INTERRUPT SLAVES 
CONTINUE 


71S CHARACTER IN THE BUFFER? 


cL 

caren Hg MASTER HAVE POWER FAILED? 
; FAILURE TO POWER FAIL 

; CONT INUE 


2GET THE SWITCH VALUES 
ONLY CPU BITS 


:SET INTERRUPT SITS 


EVEN OR ODD? 
BRANCH IF EVEN 
: INTERRUPT ING AN EVEN NUMBER OF SLAVES 


INTERRUPTING AN ODD # OF SLAVES 


:DID WE EXPECT POWER FAIL? 
BRANCH IF YES 
—M POWER FAILED 


C 

zALLOW CPU oy gl 4 apace 

;CPU POWER FAIL MSG 

:SET UP FOR PATTERN CHECK 

CHECK THE PATTERN 

SARE WE IN HIGH CORE? 

BRANCH IF NO 

ELSE RELOCATE 

SIGNAL THE SLAVES 

i WE ~ NOW BACK DOWN IN LOW CORE 
:MAKE SURE MM ON POWER-UP DISABLED 
sMAKE TS22A DELAY 


zPOINT TO NEXT BOX 
7: CONT INUE 
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012777 
Vier 


012777 
016006 


005700 
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000023 
000023 
016770 
014944 

1 


016766 


014540 
177776 
000000 


100000 
000023 
014200 
ds 33 


04036 
030104 
014540 


177572 


000001 
014534 
014536 
177572 
014536 


014522 


164306 
014002 


167054 
164214 


014702 


172340 


177572 
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CHECK AC POWERFAIL ON MEM BOXES, PORTS ENABLED 


5 RARE REAR EAE EERERARRREEERREREREEE ERE 


:*TEST 23 CHECK AC POWERFAIL ON MEM BOXES, PORTS ENABLED 


a lahalalalia ia lahale he ialhaheiehelalelehaheleheinialaisieleleiaiahelelsiahelsishalelsiahehalsisiaheieisieiaieleisheleleleielale! 


TST23: 
MOV #23, aDISPLAY 
MOVB #23, STSTNM(R1) 
2s: ASRB SYNC .3 
BCC 2s 
INC ENTR23 
MOV #1, SYNC 
1$: CMP CPUACT, ENTR23 
BNE 1$ 
CLR EXIT 
CLR PSW 
CMP RO, #0 
BNE TS23B 
BR TS23A 
TS23B: BIS #B1T15, @ACR 
MOV #23, @D1SPLAY 
MOV SS$STP(ROD, SP 
CLR PFFT (RO) 
MOV nObe aaa 
MOV #10 
TST EX 
BEQ 
CLR 
JMP TST24 
1$ TST RELOUP 
BEQ 2$ 
JSR PC, SE TMM 
ADD HIBOX, KIPARO 
ADD HIBOX, KIPAR1 
ADD HIBOX, KIPAR2 
BIS #1, MMRO 
CLR RELOUP 
BR TS23B8 
23: TST RELODN 
BEQ TS238 
CLR MMR 
CLR RELODN 
TS2 
100$: TST PWRF 
BNE 101$ 
ERROR 1 
BR TS23B 
101$: CLR NOPRMP (RO) 
TYPE ,1M103 
238 
TS23A: 
TST RO 


;SET TEST NUMBER 


;SET THE TEST NUMBER 
; CONTROL THE ENTRY 


; INCREMENT ENTER FLAG 


ALLOW THE OTHERS IN 
SARE ; a CPUS HERE? 


NOT YE 
;CLEAR THE EXIT FLAG 
SET KERNAL MODE 

:IS cans THe MASTER? 
7BRONCH 

7 THIS Is. THE MASTER 


: INITIALIZE THE [IST 
7SET TEST NUMBER 


ET 

INITIALIZE THE STACK 
SSPECIFY THE POWER FAIL 

SET FOR UNEXPECTED TRAPS TO 4 
;SET FOR POWER FAIL RETURN 
sFINISHED WITH THIS TEST? 
[BRANCH IF NO 


[MAKE SURE i" 1S TURNED OFF 


:GO TO NEXT TEST 
:TIME TO RELOCATE? 
BRANCH IF NO 


;GET READY FOR RELOCATION 


SLAVE IS NOW IN HIGH CORE 
CLEAR RELOCATION FLAG 
; CONTINUE TESTING 


:TIME TO RELOCATE? 
BRANCH IF NO 
RETURN TO LOW CORE 


“CLEAR THE FLAG 
* CONT INUE 


SHOULD WE BE HERE? 
BRANCH IF YES 

UNEXPECTED CPU POWER FAIL 
: CONTINUE TESTING 

;WANT TO IDENTIFY ae CPU 
EXPECTED CPU POWER FAIL 


> CONTINUE TESTING 


71S THIS THE MASTER? 


SEQ 0069 
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012737 
004737 


001414 
012737 


09:1 


041476 
014002 


000001 
000000 
032076 
014540 


0000 

014200 
014612 
040362 


014502 


000002 
000001 
014526 
032576 


014530 
032434 
032322 
042317 


042363 
030574 
014526 


020000 


014522 
014526 


166604 
163744 


014702 


000170 
014540 


014646 


000000 


5$: 


3$: 


4$: 


<a aa 
—O 
AA 


13$: 


6 
a 74 id POWER FAIL MACY11 3001059) 


O6-JUN=79 09:12 PAGE 56 


CHECK AC POWERFAIL ON MEM BOXES, PORTS ENABLED 


; BRANCH 


F NO 


~(SP) 
STSTNM(R1),(SP) ;GET THE TEST NO. 


5$ 

,1M77 TEST’ 
2 

#1, PWRFL 

#0, BOOT 


PC, MEMS IZ 


#16, R2 
#B1T15, @ACR 
#23, @DISPLAY 


eeteat SP 
PFFT(RO) 

A#CPUER, ERRTAB(RO) 
R2 

3$ 

#112, #110 

a40 

#1, EXIT 

TST24 

START (R2) 

10$ 

4$ 

#2, Re 

2$ 

#1, BOXNUM 

11$ 

BOOT 

103$ 


PATCHK 

PC. PATTRN 
P BUF CLR 

1106 

R2, ~(SP) 

-1M107 

#100$, R3 

BOOT 

12$ 


#20000, a#0 


;TYPE 2 DIGITS, NO LEADING 0 


SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 
SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND | 
7FIND ALL THE MEM BOXES 

WAS ONLY ONE MEM BOX FOUND? 

;BRANCH IF NO 

WE CAN'T DO THIS TEST 
POINT TO BOX #7 


s INITIALIZE THE IIST 


7SET THE TEST NUMBER 


R FAIL 
SET FOR UNEXPECTED TRAPS TO 4 
[DID WE } ALL THE BOXES 


BRANCH I 
RESTORE LOC 110 
RESTORE LOC 0 
SIGNAL _THE ooo Bs TO EXIT 
7GO TO THE NEXT TEST 
[WHAT DO WE KNOW ABOUT THIS BOX? 
[BRANCH IF NOT THE BASE BOX 
;BRANCH IF ITS THE BASE BOX 


SEQ 0070 


bing oy NO BOX-POINT TO THE NEXT LOWER BOX 


: CONT 

[WAS THERE ONLY ONE MEM BOX? 
BRANCH IF YES 

iTS Me ig A TEST? 


:TO TEST THE BASE BOX, 


;WE ARE NOW IN HIGH CORE 
:SET TO gh PATTERN 


SPECIFY THE CONDITIONS 
;SET_ UP THE POWER a RETURN 


:1S THIS THE DC TEST 


BRANCH IF NO 
;MAKE BOOTING SLAVE SP=20000 


:RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 
; TURN MM ON -UP 


ON POWER 
[SIGNAL SLAVES TO RELOCATE 
[GET READY TO GO TO HIGH CORE 


; ER 
STELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 
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2448 030452 005237 000110 INC av110 :HANG THE SLAVES BOOT 
2449 030456 105777 163526 TSTB oS TKS :1$ CHARACTER IN BUFFER? 
2450 030462 100370 BPL 13$ : LOOP 
2451 030464 012777 032762 166334 MOV WENTR, @ISTVEC ‘SET UP TO INTERRUPT SLAVES 
2452 030472 000413 BR 14$ > CONT INUE 
2453 030474 128: 
2454 030474 105777 163510 TSTB asTKs 31S CHARACTER IN THE BUFFER? 
2455 030500 100375 BPL 12$ LOOP 
2456 030502 005737 014522 17$: TST PWRFL ; SHOULD THE MASTER HAVE POWER FAILED? 
2457 030506 001402 BEQ 18$ “BRANCH IF 
2458 030510 104024 ERROR 24 ;FAILURE TO POWER FAIL 
2459 030512 000441 BR 102$ * CONT INUE 
2460 030514 104401 047036 188: TYPE OK 
2461 030520 000436 BR 102$ 
2462 030522 017704 163432 14$: MOV aSwR,  R4 iGET THE SWITCH VALUES 
2463 030526 042704 177760 BIC #177760, R4 *SAVE ONLY CPU BITS 
2464 030532 012777 000000 166262 MOV #PGTE, @ACR ZACCESS PGTE REG 
2465 030540 010477 166260 MOV R4, @ADR SET INTERRUPT BITS 
2466 030544 032737 000001 016766 BIT #BITO, CPUACT ‘EVEN OR ODD? 
2467 030552 001404 BEQ 15$ “BRANCH IF EVEN 
2468 030554 012777 000001 166242 MOV #1 @ADR + INTERRUPT ING AN EVEN NUMBER OF SLAVES 
2469 030562 000422 BR 103$ ; 
2470 030564 012777 000003 166232 158: MOV #3 @ADR ; INTERRUPTING AN ODD # OF SLAVES 
ral 030572 000416 BR 103$ 
2473 030574 005737 014522 100$: TST PWRFL :DID WE EXPECT POWER FAIL? 
2474 030600 001002 BNE 101$ [BRANCH IF YES 
2475 030602 104001 ERROR 1 MASTER ERROREOUSLY POWER FAILED 
2476 030604 000404 BR 102$ > CONT INUE 
2477 030606 005060 017004 101$: CLR NOPRMP (RO) TALLOW CPU IDENTIFICATION 
2478 030612 104401 041635 TYPE 1103 [CPU POWER FAIL MSG 
2479 030616 012737 000001 014530 102%: MOV #1, PATCHK ‘SET UP FOR PATTERN CHECK 
2480 030624 004737 032434 JSR PC, PATTRN ‘CHECK THE PATTERN 
2481 030630 032737 000001 177572 103$: BIT #1. MMRO SARE WE IN HIGH CORE? 
2482 030636 001411 BEQ 104$ *BRANCH IF NO 
2483 030640 004737 032722 JSR PC, RELOLO SELSE RELOCATE 
2484 030644 012737 000001 014536 MOV #1, RELODN s SIGNAL THE SLAVES 
2485 030652 005037 177572 CLR MMRO + WE ARE NOW BACK DOWN IN LOW CORE 
2486 030656 005037 014532 CLR HICORE “MAKE SURE MM ON POWER-UP DISABLED 
2487 030662 005005 104$: CLR R5 ‘MAKE TS23A DELAY 
2488 030664 077501 SOB R5, : 
2489 030666 162702 000002 SUB #2. R2 :POINT TO NEXT BOX 
000137 030210 2$ = CONT INUE 


MAINDE C=11=CEKBG~8 
CEKBGB.P11 


311 
1 
1 
1 
1 
1 
1 
1 


EX RSRVK 





09:14 


000024 


900024 
016770 


014546 
000001 
016766 


014540 
177776 
000000 


100000 
000024 
014200 
014612 
040362 
031126 
014540 
177572 


031720 
014534 


014536 


177572 
014536 


014522 


017004 
041635 





6 
PDP=11/70,74 ors POWER FAIL MACY11 30a(1053) 








SLUR AAA E EERE RERREERE ERE 


CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER UP 


J LEAR AREER AER ERRE RAE AAR EEEREEEREERERERERER EERE 


#24 ,aDISPLAY ;SET TEST NUMBER 


SET THE TEST NUMBER 
;CONTROL THE ENTRY 


; INCREMENT ENTER FLAG 
;ALLOW THE OTHERS IN 
zARE ALL CPUS HERE? 
sNOT YET 
;CLEAR THE EXIT FLAG 
:SET KERNAL MODE 
iTS THIS THE MASTER? 

CH IF NO 
STHIS IS THE MASTER 
: INITIALIZE THE [IST 

TEST NUMBER 
S INITIALIZE THE big 
:SPECIFY THE POWER FAIL 
;SET FOR UNEXPECTED TRAPS TO 4 
;SET FOR POWER FAIL RETURN 
:F INTSHED — THIS TEST? 
[BRANCH IF NO 
;MAKE SURE reat TURNED OFF 
STIME TO RELOCATE? 


: CH IF NO 
;GET READY FOR RELOCATION 





#24, $TSTNM(R1) 
SYNC .3 


2$ 
ENTR24 

#1, SYNC.3 
CPUACT. ENTR24 


#B1T15, @ACR 

#24, @DISPLAY 
$$STP(RO), SP 
PFFT (RO) 

ACPUER, ERRTAB(RO) 
#100$, R3 


PC, SE TMM 
HIBOX, KIPARO 
HIBOX, KIPAR1 
HIBOX, KIPAR2 
#1, MMRO 


06-JUN=79 09:12 PAGE 58 
CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER UP 


SLAVE IS NOW IN HIGH CORE 
;CLEAR RELOCATION FLAG 
CONTINUE TESTING 
: TIME TO RELOCATE? 

CH IF NO 


BRANCH 

RETURN TO LOW CORE 

:CLEAR THE FLAG 

> CONT INUE 

eaatn ‘ - Fae 

S UNE XPE CTED ny POWER FAIL 
; CON TESTING 

SWANT TO IDENTIFY THE CPU 


SEXPECTED CPU POWER FAIL 
; CONTINUE TESTING 


71S THIS THE MASTER? 





I 6 
MA INDE C-11=CEKBG-B PDP=11/70,74 — POWER FAIL MACY11 30A(1052) O06=JUN-79 09:12 PAGE uy 


CEKBGB.P11 O5-JUN=79 09:14 T24 CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER SEQ 0073 
2549 031154 001007 BNE 5$ : BRANCH IF NO 
2550 031156 104401 041476 TYPE ,™M77 ; EST 
2551 031162 005046 CLR -(SP) 
2552 931164 116116 014002 MOVB STSTNM(R1),(SP) ;GET THE TEST NO. 
2553 031170 104403 TYPOS 
2554 031172 -WORD 2 ;TYPE 2 DIGITS, NO LEADING 0 
2555 031174 5$: 
2556 031174 012737 000000 014522 MOV #0, PWRFL SPECIFY WHETHER OR NOT TO EXPECT CPU POWER FAIL 
2557 031202 012737 000001 014526 MOV #1, BOOT SPECIFY WHETHER OR NOT TO EXPECT CPU BOOT AND | 
2558 031210 004737 032076 JSR PC, MEMS1Z FIND ALL THE MEM BOXES 
2559 031214 005737 014540 TST EXIT [WAS ONLY ONE MEM BOX FOUND? 
2 031220 001402 BEQ 1$ BRANCH IF NO 
2561 031222 000137 031720 JMP TST25 WE CAN'T DO THIS TEST 
2562 031226 012702 000016 1$: MOV #16, R2 :POINT TO BOX #7 
2563 031232 052777 100000 165562 2$: BIS #B1T15, @ACR ae THE e 
2564 031240 012777 000024 162722 MOV #24, @DISPLAY 3SET TEST 
2565 031246 016006 014200 MOV $$STP(RO), SP INIALTZE THE STACK. 
2566 031252 5 014612 CLR PFFT(RO) SSPECIFY THE POWER FAIL 
2567 031256 012760 040362 014702 MOV ACPUER, ERRTAB(RO) SET FOR UNEXPECTED TRAPS TO 4 
031264 005702 TST Re [DID WE TEST ALL THE BOXES 
2569 031266 002012 BGE 3$ [BRANCH IF NO 
2570 031270 012737 000112 000110 MOV #112, #110 RESTORE LOC 110 
2571 031276 005037 000000 CLR a0 ;RESTORE LOC 0 
2572 031302 012737 000001 014540 MOV #1, EXIT SIGNAL _THE ope ts TO EXIT 
2573 031310 000137 031720 JMP TST25 :GO TO THE NEXT TEST 
2574 031314 005762 014502 3$: TST START (R2) [WHAT DO WE KNOW ABOUT THIS BOX? 
2575 031320 003037 BGT 10$ BRANCH IF NOT THE BASE BOX 
2576 031322 001403 BEC 4$ BRANCH IF ITS THE BASE BOX 
2577 031324 162702 000002 SUB #2, R2 ; THERE WAS NO BOX-POINT TO THE NEXT LOWER BCX 
2578 031330 000740 BR 2$ ; CONT INUE 
2579 031332 022737 000001 074646 4$: CMP #1, BOXNUM [WAS THERE ONLY ONE MEM BOX? 
2580 031340 002027 BGE 11$ BRANCH IF YES 
2581 031342 005727 014526 TST BOOT 71S THIS THE DC TEST? 
2582 031346 001141 BNE 103$ BRANCH IF YES 
2583 031350 004737 032576 JSR PC, RELOHI :TO TEST THE BASE BOX, 
2584 :RELOCATE THE PROGRAM FIRST TO THE NEXT HIGHER B 
2585 031354 012737 000001 014532 MOV #1, HICORE ; TURN MM ON ON POWER-UP 
2586 031362 012737 000001 014534 MOV #1, RELOUP :SIGNAL SLAVES TO RELOCATE 
2587 031370 063737 014550 172340 ADD HIBOX, KIPARO [GET READY TO GO TO HIGH CORE 
2588 031376 063737 014550 172342 ADD HIBOX, KIPAR1 
2589 031404 063737 014550 172344 ADD HIBOX, KIPAR2 
2590 031412 052737 000001 177572 BIS #1, MMRO WE ARE NOW IN HIGH CORE 
2591 031420 10$: 
2592 031420 005037 014530 118: CLR PAT CHK :SET_TO WRITE PATTERN 
2593 031424 004737 032434 JSR PC, PATTRN ;WRITE THE PATTERN 
2594 031430 004737 032322 JSR PC, BUF CLR ;CLEAR THE KEYBOARD BUFFER 
2595 031434 104401 042317 TYPE .1M106 ; TELL THE OPERATOR TO POWER FAIL THE MEMORY BOX 
2596 031440 006202 ASR Re 
2597 031442 010246 MOV Re, -(SP) 
2598 031444 104405 TYPDS 
2 031446 006302 ASL R2 
031450 104401 044053 TYPE -™M110 SPECIFY THE CONDITIONS 
2601 031454 012703 031616 MOV #100$, R3 [SET UP THE POWER FAIL RETURN 
2602 031460 005737 014526 TST BOOT 31S THIS THE DC TEST? 
2603 031464 001414 BEQ 12$ 7BRANCH IF NO 
031466 012737 020000 000000 13$: MOV #20000, a0 [MAKE BOOTING SLAVE SP=20000 


MAINDEC-11-CEKBG-8 


CEKBGB.P11 


031474 


03 

031614 
031616 
031622 


031710 
031714 


OS=JUN-79 09:1 


37 000110 
162504 


032762 


162466 
014522 


047036 


162410 
177760 


000000 
165236 
000001 


000001 
000003 


014522 
005060 017004 
104401 041635 

000001 
032434 
000001 


Onerae 


00000 
005037 177572 
014532 


060002 
000137 031232 


165312 


165240 
016766 
165220 
165210 


014530 
177572 


014536 


12$: 


17$: 


18$: 
14$: 


'5$: 


100$: 


101$: 


102$: 
103$: 


104$: 


6 
wae 74 ~~ gy FAIL MACY11 30a(1059) 


047110 
a$TKS 
13$ 
MENTR, @ISTVEC 
14$ 


a$TKS 


CPUACT 
#1 @ADR 
#3, @ADR 


#1, PATCHK 
PC. PATTRN 
MMRO 


PC, RELOLO 
#1, RELODN 
MMR 


06-JUN-79 09:12 PAGE 60 
CHECK DC POWERFAIL ON MEM BOXES, CPUS BOOT ON POWER UP 


;HANG THE SLAVES 
31S CHARACTER IN 


IS CHARACTER IN 


sl 
;SHOULD THE MASTER HAVE POWER FAILED? 


;BRANCH IF NO 


BOOT 
BUF FER? 


; LOOP 
;SET UP TO INTERRUPT SLAVES 
ONT INUE 


THE BUFFER? 


sFAILURE TO POWER FAIL 
ONT INUE 


2GET THE SWITCH VALUES 
V CPU BITS 


SET INTERRUPT BI 
SEVEN OR ODD? 
BRANCH IF 


EVEN 
: INTERRUPT ING AN EVEN NUMBER OF SLAVES 


= INTERRUPT ING AN 


TS 


ODD # OF SLAVES 


:DID WE EXPECT POWER FAIL? 
BRANCH IF YES 

[MASTER ERROREOUSLY POWER FAILED 
; CONT INUE 


SALLOW CPU ng: 
:CPU POWER FAIL M 
7SET UP_FOR PATTE 
: CHECK THE PATTERN 
ARE WE IN HIGH C 
“BRANCH H IF NO 
ELSE RELOCATE 
;SIGNAL THE SLAVE 


WE ARE NOW BACK 
ON POWER-UP DISABLED 


MAKE SURE MM 
MAKE TS24A DELAY 


ee 
“~. CHECK 
ORE? 


S 
DOWN IN LOW CORE 


:POINT TO NEXT BOX 
; CONT INUE 


SEQ 0074 


MAINDE C-11=CEKBG-8 
CEKBGB.P11 O5S-JUN-79 09:1 


031720 


032176 


012777 


010562 


000025 
000025 
000400 
035060 
000000 


031766 
032020 


041476 
014002 


014333 
041700 
004000 
014714 
016770 
014714 
000001 
016766 


014220 
035060 


172100 
014646 


032232 
000010 


1 
014462 


014612 


16770 
14714 


014702 


014462 
014502 


6 
9 hi 74 sed | POWER FAIL MACY11 30a (1053) 06-JUN-79 09:12 PAGE 61 


CHECK SYSTEM RECOVERY ON AC POWER FAIL 


FL AAR ERE AREER EERE REREEREREKERREREREERRE ERE 


SeTEST 25 


CHECK SYSTEM RECOVERY ON AC POWER FAIL 


J ARERR EERE ERE REE EEEEEEREEEERERERE EERE EKER EEE EEKEE 


TST25: 


MEMSIZ: ( 
MO 


1$: 


#25,QDISPLAY | ;SET TEST NUMBER 
#25 $TSTNM(R1) :SET THE TEST NUMBER 
#Su08. aSwR (RO) *SKIP THIS Test? 


BRANCH IF NO 
;ELSE GO TO EOP 
SWITCH THIS PROCESSOR? 


;BRANCH IF NO 
YES, SWITCH TO A. 
:NO, SWITCH TO B. 


71S THIS THE MASTER? 
;BRANCH IF NO 
3‘ ‘TEST'' 


(SP) 
STSTNM(R1),(SP) ;GET THE TEST NO. 
2 TYPE 2 DIGITS, NO LEADING 0 


-$SCRLF 
-1M104 3’ POWER FAIL ENTIRE SYSTEM’’ 
avi, PFFT(RO)” 


R3 
SYNC.2 

;WAIT FOR POWER TO FAIL 
- ;CONTROL THE CPUS 


A 2 ;COUNT THE CPUS 
SYNC.3 ALLOW ANOTHER IN 
CPOACT. SYNC.2 


, SNULL 
$EOP :GQ TO END OF PASS 


MEMORY BOX TEST ROUTINES 

R2 GET SET TO oe hg a AND STOP TABLES 
#172100, R4 [POINT TO THE FIRST CSR 

BOXNUM ZSTART WITH 0 BOXES 


#100$, ERRTAB(RO) #SET UP FOR NO BOX 
#10, (R4) SET UP TO GET BOX CAPACITY 
(R4)+, STOP(R2) 


STOP(R2) 
#177600, STOP(R2);NOW WE HAVE IT 

(R4)+,  START(R2) “NOW GET THE STARTING ADR. 
#177000 START (R25) 

START (Re) R5 ;MAKE IT LOOK LIKE A PAR 


#10., 
R5, START (R 2) 
STOP(R 2). RS ;DO THE SAME FOR STOP 


STOP(R2) 


SEQ 0075 
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304 
2306 
032312 
032320 


032322 


032532 


01 
012737 
000207 
105777 
100003 


2 
012715 
022725 


6 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30a 1059) 
O5S-JUN=79 09:14 ME 


014502 
014646 
014502 
014502 
177777 

04 
000004 
000002 
000020 
040362 
000001 


014522 


043771 
000001 


161662 
161656 


172340 
077 


000020 
033270 
014526 
014502 
Ose eas 
01 4206 
077406 
040362 
060000 
014462 
014530 


152525 
152525 


014462 


014550 
014502 


014702 
014646 


014540 


172300 


172346 


177572 
172346 


MORY BOX TEST ROUTINES 


100$: 


101$: 


102$: 


BUF CLR: 


1$: 
SETMM: 


PATTRN: 


1$: 


2$: 


3$: 


RTS 


O06-JUN-79 09:12 PAGE 62 


START(R2), STOP(R2) ; STOP=START+CAPACITY 
BOXNUM S INCREMENT BOX COUNT 
START (R2) 71S THIS THE BASE BOX? 
BRANCH IF YES 
Saad HIBOX ;GET A BOX TO RELOCATE TO 
#-1, START (R2) ; INDICATE NON-EXISTENT BOX 
a4, SP sRESTORE THE STA 
a4, R4 :POINT TO NEXT CSR PAIR 
#2, R2 ie od TO NEXT TABLE LOCATIONS 
#20, Re HAVE WE LOOKED FOR EIGHT BOXES? 
1$ BRANCH IF NO 
A#CPUER, ERRTAB(RO) RESET TRAP TO 4 POINTER 
#1, BOXNUM ;WAS THERE MORE THAN A SINGLE BOX? 
102$ CH IF YES 
FL SIS THIS TEST 23? 
102$ BRANCH IF YES 
-1™M109 :PRINT ONLY ONE BOX MSG 
#1, EXIT :SIGNAL TO EXIT 
PC RETURN 
a$TKS 71S THE BUFFER EMPTY? 
1$ ;BRANCH IF YES 
@$TKB, R5 FLUSH IT 
BUF CLR ; LOOP 
PC RETURN 
KIPARO SET UP PARS 0,1,2,7 
#77406, KIPDRO 


#200, | KIPAR1 
#77406, KIPDR1 


He KIPAR2 

#77406, KIPDR2 

#177600, KIPAR7 

#77406, KIPDR7 

#20, | MMR3 

#MMERR, MMVEC 

PC 

BOOT 

7$ 

START (R2) 

7$ 

PC, SE TMM 

START(R2), KIPAR3 

#77406, KIPDR3 

#CPUER, ERRTAB(RO) 
ARO 


fe6000 


+ KIPAR3 
Sg 
PAT CHK 
3$ 
#152525, (RS) 


#152525, (R5)+ 


zARE WE . DC TEST? 


BRANCH 

zARE WE DOING THE BASE BOX? 
sBRANCH IF YES 

SET UP PARS 0,1,2,7 

[USE PAR3 TO WRITE PATTRN 

2 SET UP FOR UNEXPECTED TRAPS 


; TURN 

:POINT TO PAR3 SPAC 

71S THIS THE END OF THE BOX? 

BRANCH IF YES 

ZARE WE WRITING A PATTERN? 
ANCH_IF ONLY ~ IT 

‘WRITE THE PATTERN 

31S THE PATTERN CORRECT? 


SEQ 0076 


6 
MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL nana al _30acT052) O6-JUN-79 09:12 PAGE 63 
CEKBGB.P11 O5-JUN-79 09:14 MEMORY BOX TEST ROUTIN SEQ 0077 


4$ ;BRANCH IF YES 
172346 014250 KIPAR3, $REG1(RO) SAVE THE BAD ADDRESS (PAR) 
13 ;MEMORY IS CORRUPT Son 
BR 6$ ;REPORT ONLY ONE ERR 
100000 : #100000, R5 SARE WE STILL IN PARS SPACE? 
2$ ;BRANCH IF YES 
000200 172346 #200, KIPAR3 ZELSE RESET THE PAR 
1$ D CONTINUE 


177572 ‘ ZEND MM 
032574 : RETURN 


032576 004737 032340 : . SE TMM 3SET UP PARS 0,1.2,7 

03 040362 MO ERRTAB(RO) ;SET UP FOR TRAP 10 4 
014550 HIBOX, KIPAR3 PARS 3.4,5 WILL TAKE US TO HIGH CORE 
077406 
014550 
000200 
077406 
014550 
000400 
077406 
060000 POINT TO PAR3 

;POINT TO PARO 

TURN ON MM 

RELOCATE THE PROGRAM 


000001 


060000 ; 5 TARE WE FINISHED? 
1$ ‘BRANCH IF NO 


177572 ; TURN OFF MM 
032720 


032722 172346 RELOLO: USE PARS 3,4,5 TO RESTORE CODE TO LOW CORE 
000200 172350 MO #200 
000400 172352 #400, KIPARS 
060000 R4 POINT TO PAR 3 
POINT TO PAR O 
: (R4)+ RESTORE THE PROGRAM 
060000 R5 zARE WE FINISHED? 


BRANCH IF NO 

;RETURN-STILL EXECUTING IN HIGH CORE 
001000 177746 : CONTRL ;TURN OFF CACHE 
164026 MO C R5 GET CPU ID 
177770 » 

SET UP RO 


R4 
014226 : $CPUID(R4), R5 
64$ 


000010 R4 #10 


RO 
R1 SET UP R1 


R1 
100000 163766 #B1T15, @ACR a PAUIA IS THE IIST 

016006 014200 $$STP(RO), SET UP THE STACK 

012760 034412 014662 #SPWRDN, PURTAB (RO): ;SET UP FOR POWER DOWN 
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MAINDEC-11-CEKBG-8 that 74 SYSTEM POWER FAIL MACY11 30a(1053) O6-JUN=79 09:12 PAGE 64 
CEKBGB.P11 05=JUN-79 09:1 MEMORY BOX TEST ROUTINES SEQ 0078 
2819 033046 020027 000000 CMP RO, #0 ; SHOULD WE BE HERE? 
2820 033052 001406 BEQ 1$ ;BRANCH IF NO 
2821 033054 005060 017004 CLR NOPRMP (RO) 
2822 033060 104401 044746 TYPE -™M111 
2823 033064 000137 030762 JMP 1$24B ;RETURN SLAVES 
2824 033070 104025 1$: ERROR 25 UNEXPECTED INTERRUPT 


2825 033072 000000 HALT ;HALT THE MASTER 


MAINDEC-11-CEKBG-8 
CEKBGB.P11 


0 
033140 


033142 


033272 


033274 


B 
aide 74 SYSTEM POWER FAIL MACY11 30A(1052) O06=JUN-79 09:12 PAGE 65 
PARITY ERROR HANDLER 


.SBTTL PARITY ERROR HANDLER 
PARERR: DEC 
PARFLG: .WORD 


05=JUN-79 09:1 


177766 
177744 


177744 
000001 


000000 
077406 
000200 
077406 
000400 
077406 
000000 
077406 
000200 
177600 
077406 
000020 
033270 


000200 
014632 
174000 


014250 
014260 


177744 
033076 


176700 


176710 
176702 


176712 
176700 


176712 


1$: 


» SBTTL 


MMERR: 


MBUSR: 
4$: 


3$: 


1$: 


e08 FIRST TIME IN? 
1$ ;BRANCH IS YES 
ELSE HALT 


CPUERR, $REG1(RO) 
MEMERR, $REG2(RO) 
7 UNEXPECTED TRAP TO 114 


@4MEMERR ,@AMEMERR ;CLEAR ERROR INDICATORS 
#1 ,PARFLG ZINITIALIZE PARITY ERROR FLAG 
:CONTINUE TESTING 


RTI 
SETUP MEMORY MANAGMENT REGISTERS 


a#K IPARO ;SETUP PARO FOR 1ST 4k 
WP 80G @FKIPDRO 34K, RW. EXPAND UP 


00,a#KIPAR2 SETUP P, 
oye @FKIPDR2 :4K,R/W,EXPAND UP 
#0, @4KIPARS *SET UP PARS FOR 1ST 4k 
477 80G. @FKIPDRS :4K, R/W, 

#200, @#K IPARG SET up PAR6 FOR 2ND 4K 
T ALL REFERENCES 
PAR? FOR 1/0 PAGE 


I 
AMMERR , @AMMVE C SET UP MEMORY 7 eect VECTOR 
PC ;RETURN FROM CAL 
;MEMORY MANAGEMENT ERROR 
MMERR 
MASSBUS TRANSFER ROUTINES 


git @ARPCS1 ;WAIT FOR CONTROLLER READY 


MBDSW(RO), @ARPCS2 ;GET THE DRIVE # 
#-4000 , a#RPWC t:SET WORD COUNT 
R4,@4RPBA 3:SET MEMORY ADDRESS 
@ARPDA ;zREAD SECTOR 0 
lt?, @ARPDS sWAIT FOR DRIVE READY 
#B1ITO,@4RPCS1 a2 

MMERR ;:D0 ASRB DURING TRANSFER 
MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

MMERR 

#BIT7, @ARPDS : DEVICE READY? 

1$ ; BRANCH IF NO. 


SEQ 0079 


MAINDEC-11-CEKBG-8 


CEKBGB.P11 


033526 


05-JUN-79 


005737 
100001 
000000 
000207 
012737 
005204 


PDP=11/70,74 SYSTEM POWER FAIL yb > gplseenin 06=JUN=79 09:12 PAGE 66 


09:14 MASSBUS TRANSFER ROUTINES 
176700 TST @ARPCS1 ANY ERRORS? 
BPL 2$ 32NO 
HALT sive 
2$: RTS PC + [RETURN 
.SBTTL LINE CLOCK ROUTINE 
033460 000100 SETCLK: MOV #5$,a#100 ;3SET THE INTERRUPT VECTOR FOR CLK 
_INC RG [ADD 1 TO THE ARGUMENT PASSED 
000100 177546 MOV #B1T6, ,@ALKS 33 START THE CLOCK 
000340 177776 5$: BIS #340, a4PS ::HIGH PRIORITY 
000200 177546 BIC #BIT?, aALKS >:CLEAR THE MONITOR BIT 
DEC R4 ZZ0ONE TICK 
TST RG ::COUNT TO ZERO? 
BNE 6$ :NO DON'T STOP THE CLOCK 
177546 CLR aALKS *: TURN IT OFF 
NOP 
NOP 
NOP 
NOP 
000004 ADD #4, (SP) ::SKIP RETURN 
000002 6$: SUB #2. (SP) ::IF COUNT ISN'T EXPIRED.. 
7$: RTI ‘RETURN TO THE WAIT 


SEQ 0080 


D 
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-SBTTL POWER FAIL ROUTINE (SECTION 1) 


012737 034172 014662 : MILLUP,PWRTAB ;IF TOO FAST WITH POWER UP 
016740 UBEF ;;USE UNIBUS EXERCISER? 


64$ 
000020 170016 : WBIT4,@#UBCR2 ;:;CLEAR POWER FAIL ENABLE 
090440 #440, SP :YELLOW OR RED? 
014200 $$STP(RO),SP SET EMERGENCY STACK 
: R2,-(SP) SAV 
177572 AMMRO,R2 + SAVE Psu THRU MMRO 
(R2)+,=(SP) 
177676 
0$ 
177776 MO i ZSAVE PSW 
‘SAVE CACHE CONTROL 
aAMMR3, :SAVE MMR3 
172200 #SIPDRO,R2 ‘SAVE SIPDRO THRU KDPAR7 
: (R2)+,=(SP) 
172376 #KDPAR7 .R2 
170200 AMAPLOO,R2 :SAVE THE UNIBUS MAP 
: (R2)+,-(SP) 
170376 #MAPH37 ,R2 


PEPEER ERE SE 3 


23555545435 
DONAULSWN—O 


By 
es) 


;SAVE THE GENERAL REGISTERS 


014572 SP, SAV6 SAVE THE STACK 
016754 ;CLEAR LOOP COUNTER 
RO RO : INDEX TO THE RIGHT COUNTER 


1,RO 
034012 01 oo wi GOOD POWER-UP 
000001 01 LOOPS # OF LOOPS FOR 2 MS (WORST CASE CONTENTION) 
000160 033722 “START LOOPING UNTIL DC POWER FAILS 
033722 016754 : 


033726 016752 016754 LOOPS , COUNTO 32MS_UP? 
001372 3$ BRANCH IF NO 
7 FINISHED 


016756 : COUNT 1 
016752 016756 bg0PS COUNT 


016760 : COUNT 2 
016752 016760 brs. COumTe 


016762 : COUNT3 
016752 016762 LOOPS , COUNTS 
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001372 
000000 


012737 
0137 


001403 
012737 
105737 
001403 
052737 


034176 
014572 


170400 
170200 
172400 
172200 
172516 
177746 
177776 
177700 
177572 
034202 
033530 
016740 
000001 
016737 


001000 
000014 


016752 
045004 


PDP=11/70,74 SYSTEM POWER FAIL MACY11 
714 POWER FAIL ROUTINE (SEC 


014662 


014662 


017014 


177746 
177746 


016754 


E 
fr he 5 06-JUN-79 09:12 PAGE 68 


6$ 


MILLDWN,PWRTAB;SET TOO FAST DOWN VECTOR 
SAV6,SP ;RESET SP 

(SP)+,R5 SRESTORE THE REGISTERS 
(SP)+,R4 

(SP)+,R3 

(SP)+,R1 

(SP) +,RO 


WMAPH37+2,R2 RESTORE UNIBUS MAP 
(SP)+,=-(R2) 
AMAP 


° 


10$ 

#KDPAR7+2 ,R2 RESTORE K AND S PARS/PDRS 
(SP)+,~(R2) 

#SIPDRO,R2 

20$ 


sRESTORE MMR3 

RESTORE CACHE CONTRL 
RESTORE PSW 

RESTORE PSwW THRU MMRO 


RESTORE R2 
; CHECK THE a TIME 
#POWDWN,PWRTAB ;RESET THE DOWN VECTOR 
UBEF ;UBE BEING USED? 
2$ ;BRANCH IF NO 
#1, UBELCK [CLEAR THE PF LOCK 


MPF :MULTIPROCESSOR MODE? 

1$ ;BRANCH IF NO 

#1000,@4CONTRL ;BYPASS CACHE 

#14, @#CONTRL TURN OFF CACHE 
; JUMP INDIRECT TO R3 


POWER UP BEFORE ~—— DOWN COMPLETE 
72 ;LOCK UP THE HALT 


;POWERED DOWN BEFORE UP COMPLETE 
2 ;LOCK UP THE HALT 


LOOPS , COUNTO(RO) ;DID WE HAVE ENOUGH POWFR DOWN TIME? 
1$ ; BRANCH a we 
, SDOWN T ENOUGH TIME 


PC 


SEQ 0082 
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g 


CONAUEW 


37 
052737 


017705 
072527 
005004 


012760 
032760 
001403 
012737 


012246 


i Na 74 SYSTEM POWER FAIL MACY11 30a(1059) 
POWER FAIL ROUTINE (SECTION 2) 


-SBTTL POWER FAIL ROUTINE (SECTION 2) 
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014532 


162446 
177770 


014226 


000010 


014662 
035050 
000040 
177777 


017044 
014200 
177572 
177676 
177776 
177746 
172516 
172200 
172376 


170200 


He ee 
So 
x 


ae ee ee ee 
NAN S inn 
nN 
pat 
oO 


~inonorna 
Ww 
. 
*~ 


014662 
014612 


014642 


SPOWER: 


1$: 


65$: 


64$: 


$PWRDN: 


10$: 


1$: 
100$: 


20$: 


30$: 


HICORE 
1$ 


06-JUN-79 09:12 PAGE 69 


DID WE fw DOWN IN HIGH CORE? 
[BRANCH IF 
SET UP PARS S 0, 1,2,7 


#177600, ? KIPAR7 


R4 
SCPUID(R4), RS 
64 


R 

@PWRTAB(RO) 
#$ILLUP ,PWRTAB(RO) 
#SSD ,PFFT (RO) 

10$ 

#-1, SIGNAL 


YELL RCRD? LP 
+ pert tal 


= 
* 


;POWER-UP IN HIGH CORE 
:COPY ACR 


:GET THE ID 
;SET UP RO 


; JUMP TO THE POWER ROUTINE 


7 SET w¥t FOR | ILLEGAL UP 
;SEND A SIGNAL? 


e 


~ aes OR RED? 

;SET EMERGENCY STACK 
iSAVE Re 

[SAVE PSW THRU MMRO 


a4PSW,- (SP) SAVE PSwW 
@ACONTRL,-~(SP) ; SAVE oer | CONTRL 
3,~(SP) AVE MMR3 


#SIPDRO,R2 
(R2)+,-(SP) 
AKDPAR7 ,R2 
20$ 


AMAPLOO,R2 
(R2)+,-(SP) 


‘SAVE SIPDRO THRU KDPAR7 


SAVE THE UNIBUS MAP 


SEQ 0083 | 


G 7 
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CEKBGB.P11 05-JUN=79 09:14 POWER FAIL ROUTINE (SECTION 2) SEQ 0084 
034524 022702 170376 CMP #MAPH37 ,R2 

3069 034530 103374 BHIS 30% 

3070 034532 010046 MOV RO,-(SP) ; SAVE THE GENERAL REGISTERS 
3071 034534 010146 MOV R1,-(SP) 

3072 034536 010346 MOV R3,-(SP) 

3073 034540 010446 MOV R4,-(SP) 

3074 034542 010546 MOV R5,-(SP) 

3075 034544 010660 014572 40$: MOV SP, SAV6(RO) sry THE STACK 

3076 034550 005060 016754 CLR COUNTO(RO) LEAR THE LOOP COUNTER 
3077 034554 012760 034676 914662 MOV ASPWRUP, PURTAR(ROD: -GET SET FOR POWER-UP 
3078 034562 060000 ADD RO, RO ; iNDEX TO THE RIGHT COUNTER 
3079 034564 060000 ADD RO, RO 

034566 06 ADD RO,RO 

3081 034570 160100 SUB R1,RO 

3082 034572 160100 SUB R1.RO 

3083 034574 012737 000001 016752 MOV #1,LO0PS :4 OF LOOPS FOR 2 MS (WORST CASE CONTENTION) 
3084 034602 000160 034606 JMP 3$(RO) : START LOOPING UNTIL DC POWER FAILS 
3085 034606 005237 016754 3$: INC COUNTO 

3087 034612 023737 016752 016754 CMP LOOPS , COUNTO :2MS UP? 

3088 034620 001372 BNE 3$ “BRANCH IF NO 

3089 034622 000000 HALT FINISHED 

3090 034624 005237 016756 43: INC COUNT1 

3091 034630 023737 016752 016756 CMP LOOPS, COUNT1 

3092 034636 001372 BNE 4$ 

3093 034640 000000 HALT 

3094 034642 005237 016760 5$: INC COUNT2 

3095 034646 023737 016752 016760 CMP LOOPS, COUNT2 

309% 034654 001372 BNE 5$ 

3097 034656 000000 HALT 

3098 034660 005237 016762 6$: INC COUNT3 

3099 034 023737 016752 016762 CMP LOOPS, COUNT3 

3100 034672 001372 BNE 4 

3101 034674 HALT 

3103 034676 012760 035054 014662 $PWRUP: MOV #ILLDN,PWRTAB(RO) SET VECTOR FOR FAST DOWN 
3104 034704 016006 014572 MOV SAV6(RO) , SP “RESTORE STACK 

3105 034710 012605 MOV (SP)+,R5 Z SAVE THE GENERAL REGISTERS 
3106 034712 012604 MOV (SP) +.R4 

3107 034714 012603 MOV (SP)+.R3 

3108 034716 012601 MOV (SP)+,R1 

3109 034720 012600 MOV (SP) +.RO 

3110 034722 012702 170400 MOV #MAPHS7+2,R2 ;RESTORE UNIBUS MAP 

3111 034726 012642 10$: MOV (SP) + 5 (Re) 

3112 034730 022702 170200 CMP #MAPLOO, 

3113 034734 103774 BLO 10$ 

3114 034736 012702 172400 MOV AKDPAR7+2,R2 sRESTORE K AND S PARS/PDRS 

3115 034742 012642 208: MOV (SP)+,-(R2) 

3116 034744 022702 172200 CMP ASIPDRO,R2 

3117 034750 103774 BLO 20$ 

3118 034752 012637 172516 MOV (SP) +, a4MMR3 sRESTORE MMR3 

3119 034756 012637 177746 MOV (SP)+,@4CONTRL ;RESTORE CACHE CONTRL 

3120 034762 012637 177776 MOV (SP) +, a#PSbi SRESTORE PSW 

3121 034766 012702 177700 MOV #UDPAR7+2,R2 :RESTORE PSW THRU MMRO 

3122 034772 012642 30$: MOV (SP) +,-(R2) 

3123 034774 022702 177572 CMP #MMRO.R2 
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CEKBGB.P11 O5-JUN-79 09:14 POWER FAIL ROUTINE (SECTION 2) SEQ 0085 
3124 035000 103774 BLO 30$ 
3125 035002 012602 MOV (SP)+,R2 RESTORE R2 
3126 035004 004737 034202 JSR PC, TIMIT ;CHECK THE POWER DOWN 
3127 035010 032760 000020 014612 BIT #SSU, PFFT (RO) ;SEND SIGNALS? 
3128 035016 001403 83EO 45$ NO 
3129 035020 012737 177777 014642 MOV f-1, SIGNAL 
3130 035026 005037 014712 45$: CL SYNC.1 ; THIS MAY UNLOCK THE OTHER CPUS 
3131 035032 012760 034412 014662 MOV #SPWRDN, PWRTAB(RO) zSET VECTOR FOR POWER FAIL 
3132 035040 005703 TST R3 31S R3 ZERO? 
3133 035042 001401 BEQ 50$ sYES 
3134 035044 010316 MOV R3, (SP) zFUDGE RETURN ADDRESS ON STACK 
ge 035046 000002 50$: RTI 
3137 035050 SILLUP: 
3138 035050 000000 HALT ;POWER UP BEFORE POWER DOWN COMPLETE 
nis 035052 000777 BR r HANG UP THE PROCESSOR 
3141 035054 ILLDN: 


3142 035054 000000 HALT ;POWER DOWN BEFORE UP COMPLETE 
3143 035056 000777 BR ‘ 


MA INDE C-11=CEKBG-8 
CEKBGB.P11 


3184 


WIWNWNWWNWNNWWNIANANWNWWAW 
kk et kd od od I od os os ss) 
BELKSRAVLSSELES 


03 
035210 


035230 
035230 


035234 
035236 
035242 


035306 
035312 
035314 


05-JUN-79 


013746 


104405 
104401 
000421 


105737 
001524 
104401 
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016770 
016737 


014134 
000001 
014134 


014200 
036616 


014134 


014344 
100000 


035654 


035212 


014344 


035244 


016737 
014333 


016770 


016770 
016766 


014344 


. SBTTL 


END OF PASS ROUTINE 


PETTITT TIT TITTTTTIIT itt i titi titi iii ii ii iit iii iii ii 
« kIINCREMENT THE PASS NUMBER (SPA - 
:*INDICATE END-OF=PROGRAM AFTER 1 PASSES THRU THE PROGRAM 


>*TYPE "END PASS #XXXXX js doa NUMBER OF ERRORS SINCE LAST REPORT 


#0 > AAAAA 
CPU #1 > BBBBB 
CPU #2 > CCCCC 
CPU #3 > DDDDD 
TOTAL Set eenes ERRORS YYYYyY'’ 


*WHERE XXXXX,AAAAA “TE a DDDDD, AND YYYYY ARE DECIMAL NUMBERS 
;*IF THERES A MONI TOR GO TO IT 
;*IF THERE ISN'T JUMP TO RESTAB 


SEOP: 


4$: 


5$: 


SEOPCT: . 


1$: 
SENDCT: ao 


ASRB SYNC.3 :; CONTROL ENTRY 

BCC $EOP 

TSTB MPF 33MP MODE? 

BEQ 4$ ; BRANCH IF NO 

TST RO zz1S THIS THE MASTER? 
BEQ 4$ 23 VES 

INC SEOPSG 

MOV #1, SYNC.3 ;;ALLOW ANOTHER CPU IN 
TST SEOPSG ::1S THE MASTER FINISHED? 
BNE 1$ ; BRANCH IF NO 

MOV $$STP(RO),SP : RESET THE STACK 


JMP @RESTAB(RO) 
INC SEOPSG 


MOV #1, SYNC.3  ;;ALLOW ANOTHER CPU IN 
CMP SEOPSG, CPUACT 
BNE 5$ 
INC $PASS : INCREMENT THE PASS NUMBER 
BIC #100000, $PASS :IDON' T ALLOW A NEG. NUMBER 
DEC (PC)+ ; LOOP? 
WORD 1 
BLE 1$ Ves 


$DOAGN 
MOV Pieces) ;sRESTORE COUNTER 


TYPE i Zi TYPE AS7i2 STRING 
BR ::GET OVER THE ASCIZ 
-ASCIZ O13 ><15>/END PASS &#/ 
MOV $PASS ,-(SP) 7: SAVE SPASS FOR TYPEOUT 
at PE PASS R 
TYPDS 3GO TYPE--DECIMAL ASCII WITH SIGN 
TYPE ,67$ sTYPE ASCIZ STRING 


BR 66$ GET OVER THE Aatie 
eASCIZ / TOTAL ERRORS SINCE LAST REPORT / 


TSTB MPF 
BEQ UNIEOP 
TYPE -SCRLF 


SEQ 0086 
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035320 
035324 


035462 
035474 


035632 


104401 035326 
000404 


035760 
014042 


014333 
035364 


000001 
035760 
014042 


014333 
035424 


000002 
035760 
014042 


014333 
035464 


000003 
035760 
014042 


014333 
035524 


014224 
014333 


014224 
014042 


000042 


J 
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ND OF PASS ROUTINE 


3, 69$: 
68$: 


99$: BR 
$GET42: “ 


,69$ sz TYPE ASCIZ STRING 
68$ ::;GET OVER THE ASCiZ 
/CPUAO /<76> 


PC,EOPLID 
SERTTL(R3) ,-(SP) 
» SCRLF 

71$ 


SAVE SERTTL(R3) FOR 
3-60 TYPE==DECIMAL ASCII WITH 


si: TYPE ASCIZ STRING 
O$ ;iGET OVER THE ASCIZ 
/CPUA1 /<76> 


#1,R3 
PC,EOPLID 
SERTTL(R3) ,-(SP) 


-SCRLF 
73$ 


72:SAVE SERTTL(R3) FOR 
33G0 TYPE=-DECIMAL ASCII WITH 


sz TYPE ASCIZ STRING 
2$ Zi:GET OVER THE ASCIZ 
/CPUA2 /<76> 


#2,R3 

PC,EOPLI 

SERTIL (RS), -(SP) SAVE SERTTL(R3) FOR 
SCRLF 2260 TYPE=-DECIMAL ASCII WITH 


1 5$ sz TYPE ASCIZ STRING 
74$ :iGET OVER THE ASCIZ 
/CPUA3 /<76> 


#3.R3 
PC; EOPL I 
SERTTL (RS) ,~(SP) SAVE SERTTL(R3) FOR 
nie GO TYPE=-DECIMAL ASCII wIT#i 


.77$ 2a TYPE ASCIZ STRING 


76$ GET OVER THE tte 
/TOTAL SYSTEMWIDE ERROR COUNT 


SERGBL .~ (SP) 3:SAVE SERGBL FOR TYPEOUT 
:3GO TYPE--DECIMAL ASCII WITH 

.$CRLF 

SERGBL 

AM$ERTTL,R3 CLEAR THE 

(R3)+ ;ERROR TOTALS. 


;SKIP OVER IN SUBROUTINE 


:zGET MONITOR ADDRESS 
; BRANCH IF NO MONITOR 


TYPEOUT 
S1GN 


TYPEOUT 
SIGN 


TYPEOUT 
SIGN 


SEQ 0087 





K 
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AEG 000042 


014226 


000010 


$GET: 


MOV 


BEQ 


RESET 


SENDAD: JSR 
NOP 


N 
$DOAGN: 


JMP 
000 $ENULL: 
EOPLID: © 
C 


65$: 


@442,R2 
$DOAGN 


PC, (R2) 


SPSWR, 


=($P) 


UBEF 
TYPQUE +2 
TYPQUE 
$PSWR 


SG 
$$STP(RO) ,SP 
@RESTAB(RO) 


-1,-1,0 


R2 
$CPUID(R2) ,R3 
64$ 


(R2)+ 
R2,410 
65$ 
R2,R3 
PC 


06-JUN=79 09:12 PAGE 74 


¢ ¢ INSURE R2 - THE MONITORS 


3;CLEAR THE COUNT AND FREE SLAVES 
7ZRESET THE STACK 


RETURN 
3zNULL CHARACTER STRING 
RESET FOR COUNT 
;SID MATCH? 
; INCREMENT R2 BY 2 


;MOV LOGICAL ID TO 2ND OPERAND 
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032770 
001056 


000416 
013746 


105761 
001414 
032770 
001002 
000160 
013760 
000422 
105061 
105261 
005710 


001003 
116137 


040000 


036104 
014032 


014006 
014002 
014002 
014022 


000001 
014002 
014022 


; ; 
a? hla 74 sid | + POWER FAIL MACY11 30a(1053) 06-JUN-79 09:12 PAGE 75 


014160 


000004 


014160 


014022 


014342 


OPE HANDLER ROUTINE 
-SBTTL SCOPE HANDLER ROUTINE 


DAIS IOISIOIISIOISIOIISIOIDIOISIOIIOISIDIOIIIOIOIOIOIIOIOIOI IOI IT TOI TTT ETE EE TE EE 
SRTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
:*THE SWITCH wal t ow teeh BY THIS ROUTINE ARE: 





*SW14= 1 
+ *SWO9=1 LOOP ON ERROR 
 *CALL 
s® SCOPE 3; SCOPE=I0T 
$SSCOPE: 
1$: BIT #B1T14,aSWR(RO) + ¢LOOP ON PRESENT TEST? 
BNE SOVER YES IF SwW14=1 
;AAHAASTART OF CODE FOR THE XOR TEsTEnsonee 
$XTSTR: BR 6$ 7 IF RUNNING ON THE "*XOR"' tn CHANGE 


STHIS INSTRUCTION TO A ‘NOP*' (NOP=240) 
MOV @VERRVEC = (SP) SISA VE THE CONTENTS OF THE ERROR VECTOR 
MOV #5$ — AA "Sw is ent 


TST a4#177060 TIME OUT ON XOR? 
MOV (SP) +, @#ERRVEC ; 3RESTORE THE ge VECTOR 
BR $SVLAD :GO TO THE NEXT TEST 
5$: CMP (SP)+, (SP)+ 7:CLEAR THE STACK AFTER A TIME OUT 


MOV (SP) +, @#ERRVEC : ZRESTORE THE ERROR VECTOR 
BR 7$ ;LOOP ON THE PRESENT TEST 
mines 4 OF CODE FOR THE OR’ TESTERMAAAM 


ST. sh pai HAS AN ERROR OCCURRED? 

BEQ $SV. 7:BR IF NO 

BIT #31109, @SWR (RO) LOOP ON ERROR? 

BNE 7$ 3:BR IF NO 

JMP 4$(RO) 
7$: MOV on aan 7:SET LOOP ADDRESS TO LAST SCOPE 
4$: CLRB SERFLG(R1) ::ZERO THE ERROR FLAG 
$SVLAD: INCB STSTNM(R1) 3: COUNT TEST NUMBERS 

TST (RO) 3321S THIS THE MASTER 


BN 1$ 32NO, 
MOVB STSTNM(R1) ,STESTN 32SET TEST NUMBER IN APT MAILBOX 


MOV (SP) ,SLPADR(RO) et re SCOPE LOOP ADDRESS 

MOV (SP), wan SAVE ERROR LOOP ADDRESS 

CLR SESCAPE (RO) ;; CLEAR By ESCAPE FROM ERROR ADDRESS 

MOVB #1, SERMAX >: ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
$OVER: MOVB $TSTNM, @DISPLAY (Ri) 7zDISPLAY TEST NUMBER 

ae $LPADR(RO) , (SP) ayers on RETURN ADDRESS 


1$: 


M 
MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6-JUN-79 09:12 PAGE 76 
CEKBGB.P11 O5-JUN=79 09:14 ERROR HANDLER ROUTINE 


-SBTTL ERROR HANDLER ROUTINE 


eect iti titi ii citi iii i tii iii titi iii iii ii iii ii iii iii iii iii 
SRTHIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
:*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
; *MADE BY THE FAILING PROCESSOR 
;*AND TYPE OUT THE PROCESSOR ID AND PC OF THE ERROR INSTRUCTION 
:*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

*SW15=1 HALT ON ERROR 

3 *SWO9=1 LOOP ON ERROR 

7 *CALL 

s* N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 


SERROR: : 
105261 014006 7$: SERFLG(R1) ::SET ERROR FLAG 
7$ ;DON'T LET THE FLAG GO TO ZERO 

014002 014170 STSINNCRI) @D1SPLAY (RO) 44th g 4 TEST NUMBER 
014042 SERTTL(RO) : INC THE ERROR COUNT 
014224 SERGBL 
014064 (SP), _SERRPC (RO) “P2GET ADDRESS OF ERROR INSTRUCTION 
000002 014064 #2,$ (RO 
014064 014054 a$e— RRPC RO) $1 TEMB(R1) ;STRIP AND SAVE THE ERROR ITEM CODE 
014074 SP, SERR (RO) 72 SAVE The CURRENT STACK POINTER 
014160 asur(nO) 5 ROR? 


: ONT INUE 
RO HIS THIS THE MASTER? 


3$ 
70$ i: TYPE ASCIZ STRING 
OVER THE 


BR 5$ 3GET ASCIZ 
052114 3 <15><12>/HALT ON MASTER IN $ERROR/<15><12> 
040515 
044440 
051122 
000 


z BR 6$ NO LOOP ON ERROR 
014160 : phi - @SWR (RO) Fy gh SWITCH SET? 
014032 $LPERR(RO), (SP) ;:FUDGE RETURN ADDRESS 
014322 : $ESCAPE (ROS : 3s CHECK FOR AN ESCAPE ADDRESS 
6$ ::BR IF NONE 
014322 SESCAPE (RO), (SP) :;FUDGE RETURN ADDRESS FOR ESCAPE 


122737 000001 014356 MAPTENV, SENV : RUNNING IN APT MODE 

001007 11$ 32NO,SKIP APT ERROR REPORT 
116137 014054 036366 S$ITEMB(R1),21$ ;:;SET ITEM NUMBER AS ERROR NUMBER 
sana 4 036644 ate ; REPORT FATAL ERROR TO APT 


000 . 0 
000777 : 22$ ; APT ERROR LOOP 


022737 035644 000042 AHSENDAD , 2442 7zACT-11 AUTO-ACCEPT? 
001001 12$ ; BRANCH IF NO 
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3409 


Heeeseees 
WONAULSWN—O 


3420 


021420 


016774 
017056 

904 
014054 


014333 


036472 


014333 


014333 
177777 + 017056 


000001 


016774 


OR HANDLER ROUTINE 


12$: 
SERRTYP: 


64$: 


1$: 


2s: 
10$: 


15$: 


16$: 


17$: 


-66$: 
ass: 


20$: 


RESTAB: 


HALT 


ERRLCK 
64$ 
RO, 


#3, 
#10, 
#SERRIB, 
(R5),1$ 


a- 
#1 ,ERRLCK 


PDP=11/70,74 SYSTEM POWER FAIL ie 30a (1052) 
O5-JUN=79 09:14 ERR 


TYPLCK 
NOPRMP (RO) 
Nate! oR5 


R5 
R5 


YYY 
#$TSTNM 


YYY 
-(SP) 


YYY 
(SP) 


TYPLCK 
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ssVES 


;ALLOW THIS CPU TO ENTER TYPE ROUTINE 
3sPRINi MESSAGES WITH PROMPTS 
7sGET THE ERROR ITEM CODE 
;zADD THE ADDR. OF THE ERROR TABLE 
soSET Ww 10... 
22 TYPE THE ERROR HEADER 
eke R5 BY 


Ye 
S THERE A DATA HEADER? 
BRANCH IF NO 


3¢ INCREMENT R5 
3218 THERE DATA TO BE TYPED? 


3:GET THE DATA TABLE ADDRESS 
3zARE WE AT THE END OF THE DATA TABLE? 
; sBRANCH IF YES é 


sPOINT TO THE LOCATION WITH THE NUMBER 


zz TYPE ASCIZ STRING 
:iGET OVER THE ASCIZ 


;ALLOW ENTRY INTO TYPE ROUTINE 


7 RETURN | 
sEND QF PASS RETURN 


SEQ 0091 





B & 
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CEKBGB.P11 O5=JUN=79 09:14 ERROR HANDLER ROUTINE 


3448 





MAINDEC-11=CEKBG-8 
CEKBGB.P11 


3449 
3450 


Vinninv 

VEWP 
¥ 
— 
—_ 
~m 
N 
WwW 
N 


EEEKEELEL ES 
RIS SVE 
So oO 
3 
Nm 


Oo 
= 
= 
~m 
=~ 
ons 
WW 
N 


99 
3500 037072 


3501 037074 
3502 0002 

3503 1 
504 000100 


05-JUN-79 


C 
«al 74 sai POWER FAIL MACY11 30A(1052) 


000001 
000001 


000001 


037070 
000001 
000100 
000004 
000002 
014336 
014352 


014352 
014354 
000004 
000002 
177776 


037624 


037072 
014356 
014336 


037070 


037072 
037070 


037072 


014356 
014357 


000004 


014336 


037002 
000004 


014340 
000004 


T COMMUNICATIONS ROUTIN 
-SBTTL APT COMMUNICATIONS ROUTINE 


Sf RRR RAEEEERAEEREEREREREREEREERERE RARER EEEREEREREKEEREE ERE EH 


$ATY3: MOVB 


1$: TST 


2$: TSTB 


12$: CLRB 


$SMFLG: .BYTE 
$LFLG: .BYTE 
$FFLG: .BYTE 


-EVEN 
APTS1ZE=200 


APTENV=001 
APTSPOOL=100 


#1 ,$FFLG 
#) — 


SATYC 
#1 ,$FFLG 
RO,=(SP) 
R1,~(SP) 
S$MFLG 


5$ 
— 
— , SENVM 


SMSGTYPE 


1$ 
RO, $MSGAD 
(RO) + 


2$ 
ais 


R 
RO, $MSGLGT 
+ at 


5 
a4 (SP) ,4$ 
4(SP) 


#2,4(5S 
177776, ~(SP) 


PC $TYPE 
0 

$FFLG 
12$ 

SENV 

12$ 
SMSGTYPE 


11$ 
04 (SP) , SFATAL 
#2,4(SP) 


SMSGTYPE 
SFFLG 
$LFLG 


SMFLG 
(SP)+,R1 
(SP) +,RO 
PC 

0 


0 
0 
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32TO REPORT FATAL ERROR 
33TO TYPE A MESSAGE 


:2TO ONLY REPORT FATAL ERROR 


+ ¢PUSH RO ON STACK 
PUSH R1_ON STACK 
; s SHOULD TYPE A MESSAGE? 
:IF NOT: BR 
; }OPERATING UNDER APT? 
F NOT: 


3: SHOULD SPOOL MESSAGES? 
IF NOT: BR 
3iGET MESSAGE ADDR. 

; ;BUMP RETURN ADDR. 
7zSEE IF DONE W/ LAST XMISSION? 
331F NOT: WAIT 
::PUT ADDR IN MAILBOX 
z-FIND END OF MESSAGE 


7;SUB START OF MESSAGE 

4-7 MESSAGE LNGTH IN WORDS 
T LENGTH IN MAILBOX 

S:TELL APT TO TAKE MSG. 


:zPUT MSG ADDR IN JSR LINKAGE 
RETURN ADDRESS 
Pus 129776 ON STACK 
SICALL TYPE MACRO 


3zSHOULD REPORT FATAL ERROR? 
::I1F NOT: BR 
; | RUNNING UNDER APT? 

NOT: 


FINISHED LAST MESSAGE? 
:IF NOT: WAIT 
32GET ERROR 4 

;BUMP RETURN ADDR. 

7eTELL abt TO TAKE ERROR 


3;:POP STACK INTO R1 
sie STACK INTO RO 


TURN 
PIES, FLAG 
;;LOG FLAG 
ZZFATAL FLAG 


SEQ 0093 


D 
MAINDE C-11=CEKBG-8 2 hai 74 stig POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 80 
CEKBGB.P11 OS-JUN-79 09:1 T COMMUNICATIONS ROUTINE SEQ 0094 


3505 000040 APTCSUP=040 


MA INDE C-11-CEKBG-8 
CEKBGB.P11 


037074 
0 


037250 


E 
laa 74 SYSTEM POWER FAIL MACY11 30A(1052) 
BINARY TO OCTAL (ASCII) AND TYPE 


-SBTTL BINARY TO OCTAL (ASCII) 


MPR PASEASAAAARAALAAALASERAS AL ESE SARE LEAR ERAS ARS A RASA RAR AS ALAR SESS 


05=JUN-79 09:1 
017646 000000 
6637 000001 
112637 037371 
062716 000002 
112737 000001 
112737 000006 
112737 000005 
010346 
010446 
010546 
113737 037371 
005437 037372 
062737 000006 
113737 037372 
113737 037367 
6605 000012 
005003 
006105 
0004 
006105 
006105 
006105 
010505 
105337 037370 
000 
042703 177770 
001003 
005737 037372 
001404 


037367 


037367 


037372 


037372 
037370 
037372 


S*CALL: 


$TYPOS: MOV 
MO 


06-JUN=79 09:12 PAGE 81 


AND TYPE 


>*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
[*OCTAL (ASCII) NUMBER AND TYPE IT 


i* ‘as +N pager et an HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


MOV NUM ,=(SP) 


* TYPOS 

® -BYTE N 
* BYTE &f 
* 

* 


3* 
> *$TYPON=-=-ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 


:*$TYPOS OR $TYPOC 
NUM ,~(SP) 


; ;NUMBER TO BE TYPED 
;-CALL_FOR TYPEOUT 


321=TYPE LEADING ZEROS 


1 TO 6 FOR NUMBER OF DIGITS TO TYPE 


;0=SUPPRESS LEADING ZEROS 


3; NUMBER TO BE TYPED 
3;CALL FOR TYPEOUT 


:*STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


7 *CAL 


7 MO NUM , = (SP) 


a(SP) ,-(SP) 


BR PON 
$TYPOC: MOVB #1,$0F ILL 

MOVB ° DE+1 
$TYPON: MOVB #5 ,SOCNT 

MOV R3,-(SP) 


MOVB DIGITS, SOMODE 
MOVB SOFILL,DIGITS 
MOV 12(SP),R5 
CLR R3 
1$: ROL R5 
BR 3$ 
2$: ROL R5 
ROL R5 
ROL RS 
MOV R5,R3 
3$: ROL R3 
DECB SOMODE 
L 7$ 
BIC #177770,R3 
BNE 4 
TST DIGITS 
BEQ 5$ 


; NUMBER TO BE TYPED 
7zCALL FOR TYPEOUT 


eer OAD THE MODE 
LOAD ZERO FILL SWITCH 
NUMBER OF DIGITS TO TYPE 
S PADJUST RETURN ADDRESS 


23 SET THE ZERO FILL SWITCH 
SET FOR SIX(6) DIGITS 
:3SET THE ITERATION COUNT 
iSAVE R3 
; SAVE R4 
SAVE _R5 


7:GET THE NUMBER OF DIGITS TO TYPE 


;:SUBTRACT IT FOR MAX. 
;SAVE_IT FOR USE 
ZIGET THE ZERO FILL SWITCH 
NPUT NUMBER 


:CL WORD 
 DROTATE MSB INTO *'C’’ 
hy DO MSB 

FORM THIS DIGIT 


GET LSB OF ys | PiGiT 
:iTYPE 7 DIGIT 


GET w OF JUNK 
‘+ SEPP FOR 0 
: SUPPRESS THIS 0? 
BR IF YES 


ALLOWED 


SEQ 0095 















MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIi MACY11 eget 06-JUN-79 09:12 PAGE 82 
CEKBGB.P11 O5-JUN-79 09:14 BINARY TO OCTAL (ASCII) AND T SEQ 0096 


3562 037252 005237 037372 4$: INC DIGITS ;:DON'T SUPPRESS ANYMORE 0'S 

3563 037256 052703 000060 BIS #'0,R3 7sMAKE THIS DIGIT ASCII 

3564 037262 052703 000040 5$: BIS #' ,R3 :MAKE ASCII IF NOT ALREADY 

3565 037266 013704 037300 MOV 9$, R4 er TO ERRBUF TABLE 

3566 037272 110324 MOVB RZ, (R4)+  ;;PUT THE CHARACTER IN THE TABLE 
3567 037274 105014 CLRB (R4) 7sMAKE IT A MINI-ASCII MSG 

3568 037276 104401 TYPE +260 TO $TYPE 

3569 037300 047052 9$: ERRBUF 7 sHERE IS THE LOCATION OF MSG 
3570 037302 062737 000002 037300 ADD #2, 9$ zsMOVE TO NEXT TABLE LOC 

3571 037310 023727 037300 111052 CMP 9$, #END 3 ital THE END OF ALLOWED BUF AREA? 
3572 037316 002403 BLT 7$ CH IF NO 

3573 037320 012737 047052 037300 MOV #ERRBUF , 9$ 77ELSE POINT TO BEGINNING AGAIN 
3574 037326 105337 037366 7$: DECB SOCNT ;;COUNT BY 1 

3575 037332 003331 BGT 2$ ::BR IF MORE TO DO 

3576 037334 002403 BLT 6$ ;:BR IF 

3577 037336 005237 037372 INC DIGITS 3: INSURE LAST DIGIT ISN'T A BLANK 
3578 037342 000725 BR 2s ::GO DO ig Foal DIGIT 


; ORE R3 
3582 037352 016666 000002 000004 MOV 2(SP),4(SP) ;;SET THE STACK FOR RETURNING 


84 7 RETURN 

3585 037364 000 8$: .BYTE 0 zz STORAGE FOR ASCII DIGIT 
3586 “ 0 2s TERMINATOR FOR TYPE ROUTINE 
3587 037366 000 SOCNT: .BYTE 0 sOCTAL DIGIT COUNTER 

3588 037367 000 S$OFILL: .BYTE 0 S:ZERO FILL SWITCH 

3589 tle la 000000 SOMODE: .WORD 7 NUMBER OF DIGITS TO TYPE 






DIGITS: . 


8 
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CEKBGB.P11 05-JUN=79 09: CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEQ 0097 
3591 .SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 
3593 3 FERRER ERERERREKEEEERREEEREREEEREEREREKEREEREREREKERER 
3594 :*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
3595 S*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
3596 **NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
3597 S*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
3598 :*REPLACED WITH SPACES. 
3599 > *CALL: 
3600 i* MOV NUM, = (SP) ::PUT THE BINARY NUMBER ON THE STACK 
3601 te TYPDS *:GO TO THE ROUTINE 
3603 037374 $TYPDS: 
3604 037374 010046 MOV RO,-(SP) :zPUSH RO ON STACK 
3605 037376 010146 MOV R1,-(SP) +=PUSH R1 ON STACK 
3606 037400 010246 MOV R2,-(SP) ::PUSH R2 ON STACK 
3607 037402 010346 MOV R3,-(SP) +:PUSH R3 ON STACK 
3608 037404 010546 MOV R5,-(SP) +:PUSH R5 ON STACK 
3609 037406 012746 020200 MOV #20200, =(SP) *:SET BLANK SWITCH AND SIGN 
310 037412 016605 000020 MOV 20(SP) RS ::GET THE INPUT NUMBER 
211 037416 100004 BPL 1$ ::BR IF INPUT IS POS. 
312 037420 005405 NEG R5 ;:MAKE THE BINARY NUMBER POS. 
3613 037422 112766 0C0055 000001 MOVB = #"=, 1 (SP) 7:MAKE THE ASCII NUMBER NEG. 
3614 037430 005000 1$: CLR RO :ZERO THE CONSTANTS INDEX 
3615 037432 012703 037614 MOV #SDBLK,R3 SETUP THE OUTPUT POINTER 
316 037436 112723 00C040 MOVB so #":-—«, (R38) + :7SET THE FIRST CHARACTER TO A BLANK 
317 037442 005002 2$: CLR R2 7: CLEAR THE BCD NUMBER 
3618 037444 016001 037604 MOV $DTBL (RO) ,R1 +:GET THE CONSTANT 
3619 037450 160105 3$: SUB R1,R5 +:FORM THIS BCD DIGIT 
320 037452 002402 BLT 4$ *:BR IF DONE 
3621 037454 005202 INC R2 :: INCREASE THE BCD DIGIT BY 1 
322 037456 000774 BR 3$ 
3623 037460 060105 4$: ADD R1,R5 ::ADD BACK THE CONSTANT 
324 037462 005702 ‘ TST R2 :3CHECK IF BCD DIGIT=0 
325 037464 001002 BNE 5$ +:FALL THROUGH IF 0 
3626 037466 105716 TSTB. ~— (SP?) :#STILL DOING LEADING 0'S? 
3627 037470 100407 BMI 7$ BR IF YES 
3628 037472 106316 S$: ASLB (SP) Msp? 
3629 037474 103003 BCC 6$ ::BR IF NO 
3630 037476 116663 000001 177777 MOVB _—*1(SP) ,-1(R3) +: YES=--SET THE SIGN 
3631 037504 052702 000060 6$: BIS #'0,R2 [MAKE THE BCD DIGIT ASCII 
3632 037510 052702 000040 7$: BIS #" JR2 : IKE IT A SPACE IF NOT ALREADY A DIGIT 
333 037514 110223 MOVB _—R2, (R3) + ‘PUT THIS CHARACTER IN THE OUTPUT BUFFER 
3634 037516 005720 TST (RO) + :: JUST INCREMENT ING 
3635 037520 020027 000010 CMP RO,#10 ‘CHECK THE TABLE INDEX 
3636 037524 002746 - BLT 2$ 3360 DO THE NEXT DIGIT 
3637 037526 003002 BGT 8$ : TO EXIT 
3638 037530 010502 MOV R5,R2 ::GET THE LSD 
3639 037532 000764 BR x :GO CHANGE TO ASCII 
3640 037534 105726 8$: TSTB = (SP) + 7 WAS THE LSD THE FIRST NON-ZERO? 
3641 037536 100002 BPL 9$ F NO 
3642 037540 116663 177777 177776 MOVB  <1(SP),-2(R3)  ::YES=-=SET THE SIGN FOR TYPING 
3643 037546 105013 9g: CLRB  ~—s (R33) ‘SET THE TERMINATOR 
3644 037550 012605 MOV (SP) +,R5 : POP STACK INTO RS 
3645 037552 012603 MOV (SP)+.R3 POP STACK INTO R3 


3646 037554 012602 MOV (SP)+,R2 :POP STACK INTO R2 





MA INDE C-11-CEKBG-8 
CEKBGB.P11 


037556 
0 


037614 


05-JUN- 


012601 


79 09:1 


* 8 Hale 74 7 yh POWER FAIL MACY11 30A(1052) 
ONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


037614 
000002 000004 


$DTBL: 


$SDBLK: 


10. 
-BLKW 


(SP)+,R1 ;zPOP STACK INTO R1 
(SP) +,RO ;zPOP STACK INTO RO 

, SDBLK 3; zNOW TYPE THE NUMBER 
2(SP) ,4(S5P) ZZADJUST THE STACK 
(SP) +, (SP) 


7 sRETURN TO USER 


O6-JUN-79 09:12 PAGE 84 


SEQ 0098 


MAINDE C-11-CEKBG-8 
CEKBGB.P11 


037750 
037754 


037754 
037760 
037762 
037766 


037772 
037774 
04000. 


O5=JUN=79 09:14 


132737 


106237 
103375 
013703 
005723 


010413 
010337 


I 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 
TYPE SERVICE 


06-JUN-79 09:12 PAGE 85 


sPeies TYPE SERVICE 
YPE: 
000040 014357 BITB #40, SENVM ; INHIBIT PRINT OUT? 
BEQ 6$ ;BRANCH IF NO 
000002 arr 2, (SP) :SET RETURN 
6$: 
016774 TST ERRLCK 1S A_CPU_IN THE ERROR ROUTINE? 
BNE 3$ BRANCH _IF_NO 
017056 CMP 0, TYPLCK 1S THIS CPU FROM THE ERROR ROUTINE? 
BNE $TYPE BRANCH IF NO 
3$: MOV Re, - (SP) STORE REGISTERS USED IN THIS PROGRAM 
MOV R3, -(SP) 
MOV R4, -(SP) 
MOV R5, -(SP) 
016737 TSTB MPF 
BNE 1$ 
000400 ae R4 ;DONT TYPE A CPUID 
157114 1$: MOV @ACR, 5 sPUT SELF ID INTO R5 
177770 ASH #-10, R5 
MOV R5, R4 PUT ID_ INTO R4 
017004 MOV NOPRMP(RO),R2  ;COPY THE PROMPT FLAG 
SWAB Re :GET IT INTO THE LEFT HALF 
BIS R2,R4 :PUT IT IN R5 
000001 017004 MOV a1, NOPRMP (RO) 
017016 2$: a TQL1 ENTER TYPQUE CRITICAL SECTION 
ppsaaaanee ENQUE teaknnnne 
014720 MOV TYPQUE +2 ,R3 COPY REAR INDEX 
TST (R3)+ 7 IN 1 BY 2 
64$: MOV R4,(R3) ;QUEUE THE ELEMEN 
014720 MOV R3, TYPQUE +2 ; UPDATE THE REAR INDEX 
ett ttt titi ttt titi tits 
4$: 
pp teraawee ENQUE teaannane 
014720 MOV TYPQUE +2 ,R3 COPY REAR INDEX 
TST (R3)+ z INCREMENT BY 2 
000010 65$: MOV 10( SP), (R3) [QUEUE THE ELEMENT 
014720 MOV R3, TYPQUE +2 [UPDATE THE REAR INDEX 
PeTrrittittt itt ttt titi ts 
MOV @(R3)+, -(R3) ;GET PC OF MSG 
000001 017016 5$: MOV #1,TQL1 CLEAR CRITICAL SECTION 
TST RO 31S THIS THE MASTER? 
BEQ 11$ ;BRANCH IF YES. 
MOV (SP)+, R5 RESTORE THE REGISTERS 
MOV (SP)+, R4 
MOV (SP)+, R3 
MOV (SP)+, R2 
000002 ADD #2, (SP) 
108 RT] 7 RETURN 
017016 11$: ASRB TOL ENTER CRITICAL SECTOR 
BCC 11$ 
HERE : 


posseeee DEQUE 


Renee eeaene 


SEQ 
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CEKBGB.P11 O5-JUN-79 09:14 TYPE SERVICE SEQ 0100 
3716 040032 023737 014716 014720 CMP TYPQUE,TYPQUE+2 ;;ARE THE INDICIES EQUAL? 
3717 040040 001456 BEQ 13$ 2eYES,THE QUEUE IS EMPTY 
3718 040042 013703 014716 MOV TYPQUE ,R3 COPY FRONT INDEX INTO R3 
3719 040046 005723 TST (R3)+ c. R3'BY Two 
3720 040050 011304 MOV e oe _pipeoueut AN ELEMENT 
3721 040052 010337 014716 MOV R3,T ; UPDATE FRONT INDEX 
3722 pp SER sat A 
3723 040056 032704 000400 BIT #BITB.R4 ;WAS THE NOPRMP(RO) BIT SET? 
3724 040062 001025 BNE 12$ 
3725 040064 062704 021060 ADD #O''"RG sMAKE CPUID A CHARACTER 
3726 040070 112702 000015 MOVB #Ck,R2 ; TYPE # CARRAGE RETURN 
3727 040074 004737 040236 JSR PC,TYPIT TYPE CRLF 
3728 040100 112702 000012 MOVB MLF ,R2 
3729 040104 004737 040236 JSR PC,TYPIT TYPE IT 
3730 040110 110402 MOVB R4,R2 :CPU ID 
3731 040112 004737 040236 JSR PC,TYPIT 
3732 040116 112702 021076 MOVB #’'>"",R2 a ll 
3733 040122 004737 040236 JSR PC,TYPIT [TYPE IT 
3734 040126 112702 021040 MOVB ee. 

3735 040132 004737 040236 JSR PC,TYPIT TYPE A SPACE 

3736 040136 12$: 

3737 po etenee DEQUE teeeennnnn 

3738 040136 023737 014716 014720 CMP TYPQUE ,TYPQUE+2 ;;ARE THE INDICIES EQUAL? 
3739 040144 001414 BEQ 13$ TIVES, THE QUEUE IS EMPTY 

3740 040146 013703 014716 MOV TYPQUE ,R3 ;COPY FRONT INDEX INTO R3 
3741 040152 005723 TST (R3)+ INC. R3°BY TWO 

3742 040154 011304 MOV (R3), 4 : ;DEQUEUE’ "AN ELEMENT 

37435 040156 010337 014716 MOV R3,TYPQUE ;zUPDATE FRONT INDEX 
3744 DDO Ion oi ik 

3745 040162 112402 14$: MOVB (R4)+,R2 :GET A CHARECTER 

3746 040164 005702 TST R2 

3747 040166 001721 BEQ HERE WE'RE DONE ,R2 IS CLEAR 
3748 040170 004737 040236 JSR PC,TYPIT Z TYPE THE CHARECTER 

3749 0460174 000772 BR 14$ ; LOOP 


MAINDE C-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 06-JUN=79 09:12 PAGE 67 
CEKBGB.P11 O5-JUN-79 09:14 TYPE SERVICE SEQ 0101 


012737 014722 13$: ATYPQUE +4, TYPQUE 
014722 4720 MO #TYPQUE +4, TYPQUE +2 
000001 #1, TQL1 RETURN 
(SP)+, RS sRESTORE THE REGISTERS 
(SP)+, RG 
(SP)+, R3 
(SP)+, R2 
000002 #2, (SP) 


105777 | =153752 a$TPS ;WAIT UNTIL PRINTER IS READY 
100375 B TYPIT 





. o 
MAINDE C=11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN-79 09:12 PAGE 88 
TYPE SERVICE 


CEKBGB.P11 O5-JUN=79 09:14 SEQ 0102 
3762 040244 110277 153746 MOVB R2,a$TPB TYPE THE CHARACTER 
3763 040250 000207 RTS PC ;RETURN 


MAINDE C-11-CEKBG-8 * Ot hedaiage 74 SYSTEM POWER FAIL MACY11 30a(1052) O6-JUN-79 09:12 PAGE 89 
CEKBGB.P11 O5=JUN-79 09:1 TRAP DECODER SEQ 0103 


.SBTTL TRAP DECODER 


LRA R REAR EERE TEER eee 
;*THIS ROUTINE WILL Ay + THE ete BYTE OF Han *"TRAP’* INSTRUCTION 
;*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
:*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
:*GO TO THAT ROUTINE. 


010260 014552 STRAP: R2, SAVRG(RO) 
2 1$: (SP) ,R2 +3GET TRAP ADDRESS 
~(R2) sBACKUP BY 2 
i? oR2 :3GET RIGHT BYTE OF TRAP 
sPOSITION FOR INDEXING 

STRPAD(R2) -R2 2 ao NOE TO TABLE 
SAVRG(RO), R2 
@ROUTE (RO) 


3: THIS IS USE TO HANDLE THE ‘'GETPRI'’ MACRO 


$TRAP2: MOV (SP) ,~(SP) sMOVE THE PC DOWN 
000004 000002 MOV 4(SP) ,2(SP) 7sMOVE THE PSW DOWN 
RTI 7sRESTORE THE PSW 


-SBTTL TRAP TABLE 


;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
;*BY THE ‘‘TRAP’’ INSTRUCTION. 


: ROUT INE 


$TRPAD: .WORD $TRAP2 

$ 3, CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
:CALL=TYPOC TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
3; CALL=TYPOS TYPE OCTAL NUMBER (NO LEADING ZEROS) 
0371 ::CALL=TYPON TYPE OCTAL NUMBER (AS PER LAST CALL) 
037374 $TYPDS ;;CALL=TYPDS TRAP+5(104405) TYPE DECIMAL NUMBER (WITH SIGN) 


000170 014672 ISTDIS: JMP @ISTTAB(RO) :IIST INTERRUPT DISPATCHER 









N 
MAINDEC-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 90 
cE TRAP TABLE 


KBGB.P11 O5-JUN=79 09:14 SEQ 0104 
3808 040340 012737 177777 014602 PWRDIS: MOV #-1 FLAG FIRST INSTRUCTION FLAG 
3809 040346 005037 014602 CLR FLAG sNOW CLEAR IT 
3810 040352 000177 154304 JMP @PWRTAB 
Bi) 040356 000170 014702 ERRDIS: JMP @ERRTAB(RO) CPU ERROR DISPATCHER 
3813 040362 CPUER: 
3814 040362 013760 177766 014250 MOV @ACPUERR , $REG1 (RO) ;CPU ERROR REG. 
3815 040370 104005 ERROR 5 
3816 040372 000000 HALT 
3817 040374 000002 RTI ;RETURN 
3818 -SBTTL DATA AREA 
3819 040376 005015 042503 041113 IMI: eASCIZ <CR><LF>\CEKBG-B 11/70-74MP SYSTEM POWER FAIL DIAGNOSTIC\ 
3820 040404 026507 020102 030440 
3821 040412 027461 03 033455 
3822 040420 04 020120 054523 
3823 040426 052123 0465 04 
4 34 053517 051105 043040 


0404 
3825 040442 044501- 020114 044504 
3826 040450 043501 “rs 052123 


3828 040461 015 051412 044527 ITM2: eASCIZ <CR><LF>\SWITCH REGISTER = \ 


036440 000040 
3832 040506 005015 052533 044516 TM4: eASCIZ <CR><LF:-/CUNIBUS EXERCISER WILL BE USEDJ/ 


040550 005015 052533 044516 IMS: eASCIZ <CR><LF>/CUNIBUS EXERCISER WILL NOT BE USEDJ/ 


3845 Gepene 005015 046533 046125 TMé: eASCIZ <CR><LF>/CMULTIPROCESSOR MODE IS IN EFFECTJ/ 


3849 
3850 040654 043106 041505 056524 
04066 000 


3852 040663 015 055412 047125 IM: eASCIZ <CR><LF>/CUNIPROCESSOR MODE IS IN EFFECTI/ 
3853 040670 050111 047522 on Eat: 


3858 panes 055440 052117 042510 TM10: .ASCIZ / COTHER CPUS ARE RUNNING, J/ 


6 0 
3863 040761 015 003412 050103 TM11: .ASCIZ <CR><LF><07>/CPU &/ 


MAINDEC-11-CEKBG-8 


CEKBGB.P11 


3864 
3865 


3866 
3867 
3868 
3869 


05-JUN-79 


020125 
051440 
044506 
052125 
040440 
000105 


PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 06=JUN=79 09:12 PAGE 91 
09:14 DATA AREA 


047040 
052103 


~ 


TM12: 


eASCIZ / SPECIFIED BUT NOT ACTIVE/ 


SEQ 0105 


C . 
MAINDEC-11-CEKBG-8 PDP=11/70,74 sai A o> a FAIL MACY11 30A(1052) O6-JUN=-79 09:12 PAGE 92 


CEKBGB.P11 05-JUN-79 09:14 SEQ 0106 
3870 041024 005015 047111 042524 1M13: eASCII <CR><LF>/INTERRUPT THE POWER AFTER THE TEST NUMBER APPEARS/ 
3871 041032 051122 050125 020124 
3872 041040 044124 020105 047520 
3873 041046 042527 020122 043101 
3874 047054 042524 020122 044124 
3875 041062 020105 042524 052123 
3876 041070 7040 046525 042502 
3877 041076 020122 050101 042520 
3878 041104 051101 1 
3879 041107 9 047111 052040 -ASCII / IN THE DISPLAY./<CR><LF> 
3880 041114 042510 051511 
3881 041122 046120 054501 
3882 041130 012 
3883 041131 111 020106 047531 -ASCII /IF YOU HAVE AN RD CONSOLE, INTERRUPT THE POWER/ 
3884 041136 020125 040510 042526 
3885 041144 0 020116 042122 
3886 041152 047440 047117 047523 
3887 041160 042514 020054 047111 
3888 041166 042524 051122 050125 
3889 041174 020124 044124 020105 
3890 041202 047520 042527 122 
3891 041207 015 040412 020124 -ASCII <CR><LF>/AT THE END OF THIS MESSAGE. THEREAFTER, INTERRUPT THE POWER 15( 
3892 041214 044124 020105 047105 
3893 041222 020104 043117 052040 

0412 044510 020123 042515 
3895 041236 051523 043501 027105 
3896 041244 0040 044124 051105 
3897 041252 040505 052106 051105 
3898 041260 044454 052116 051105 
3899 041266 052522 052120 05204 
3900 041274 2510 05 053517 
3901 041302 051105 030440 02406 
3902 041310 024470 04 051117 
3903 041316 020105 044524 042515 
3904 041324 123 
3905 041325 015 052012 020117 -ASCIZ <CR><LF>/TO REACH THE END OF SECTION 1./<CR><LF> 
3906 041332 042522 041501 020110 
3907 041340 044124 020105 047105 
3 041 020104 04 051440 
3 041354 041505 044524 047117 
3910 041 40 


362 0304 006456 000012 
3911 041370 005015 042412 052116 M14:  .ASCIZ<CR><LF><LF>/ENTERING SECTION 1/<CR><LF> 
3912 Rline 051105 047111 Re yl0r 


3913 0414 042523 052103 047511 

3914 041412 020116 61 00001 

3915 041420 005015 042412 052116 1TM15: -ASCIZ<CR><LF><LF>/ENTERING SECTION 2/<CR><LF> 
3916 041426 051105 047111 020107 

3917 041434 042523 052103 047511 

3918 041442 020116 000012 

3919 041450 1 04 4 020105 TM76: -ASCIZ<12><15>/THE MASTER IS CPU &/ 
3920 041456 040515 052123 051105 

3921 0414 044440 020123 050103 

3922 041472 020125 

3923 041476 005012 052015 051505 1M77: -ASCIZ<12><12><15>/TEST / 

3924 041504 020124 000 

3925 041507 015 050012 053517 TM100: .ASCIZ <CR><LF>/POWER FAIL CPU # / 


D9 
MAINDEC=11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 93 
79 09:14 DATA AREA 


CEKBGB.P11 0QS=JUN- SEQ 0107 
3926 041514 051105 043040 044501 
3927 041522 020114 050103 020125 
3928 041530 020043 
3929 041533 015 501 047516 1TM101: .ASCIZ <CR><LF><LF>/NO MASSBUS DEVICE AVAILABLE ON CPU @ / 
3930 041540 6440 051501 041123 
3931 041546 051525 2 053105 ‘in 
3932 941554 041511 020105 053101 
3933 041562 044501 040514 046102 
3934 041570 020105 047117 041440 
3935 041576 052520 021440 0 
3936 041604 005015 051120 041517 TM102: .ASCIZ <CR><LF>/PROCEEDING TO NEXT CPU/ 
3937 041612 042505 0445 04 
3938 041620 040 020117 042516 
3939 041626 052130 041440 052520 
3940 041634 000 
3941 041635 015 050012 053517 M103: .ASCIZ <CR><LF>/POWER FAILURE ON CPU AS EXPECTED/ 
3942 041642 051105 043040 044501 
3943 041650 052514 042522 047440 
3944 041656 020116 050103 020125 
3945 041664 051501 042440 050130 
3946 041672 041505 042524 
3947 041700 005015 042507 020124 TM104: .ASCII <CR><LF>/GET SET TO POWER FAIL ENTIRE SYSTEM.../ 
3948 041706 042523 020124 04 
3949 041714 050040 053517 051105 
3950 041722 043040 044501 020114 
3951 041730 047105 044524 042522 
3952 041736 051440 051531 042524 
3953 041744 027115 027056 
3954 041750 005012 050015 052125 -ASCI1<12><12><15>/PUT BATTERY BACKUP ON ALL MEM BOXES/ 
3955 041756 041040 052101 042524 
3956 04 054522 041501 


7117 
3958 042000 040440 046114 046440 
042006 


ep 042016 006412 Restiz 042513 -ASCI1<12><15>/MAKE ALL MEMORY PORTS ONLINE/ 


3965 047117 044514 042516 : . 
042054 006412 040515 042513 /ASC11<12><15>/MAKE ALL CPU POWER-UP SWITCHES "RUN OR HALT*’/ 

3967 040440 046114 041440 
042070 052520 050040 053517 

3969 042076 051105 052455 020120 

3970 042104 053523 052111 04410 

3971 042112 051505 021040 052522 

3972 042120 020116 051117 04404 

3973 042126 046101 021124 

3974 042132 005012 052015 042510 -ASCI1<12><12><15>/THEN POWER FAIL THE ENTIRE SYSTEM/ 

3975 042140 020116 047520 042527 

3976 042146 020122 040506 04611 

3977 042154 052040 042510 04244 

3978 042162 052116 051111 020105 

979 042170 054523 052123 04650 

3980 042176 005012 051015 051505 /ASC11<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 

3981 042204 047524 042522 050040 


E 9 
MAINDEC-11-CEKBG-8 PDP-11/70,74 he ek FAIL MACY11 30A(1052) O6=-JUN=79 09:12 PAGE 94 


CEKBGB.P11  05=JUN=79 09:14 SEQ 0108 
3982 042212 053517 051105 032440 
3983 042220 051440 041505 047117 
3984 042226 051504 040440 052106 
3985 042234 051105 050040 053517 
3986 042242 051105 043040 044501 
3987 042250 114 ; 
3988 042251 012 042415 041501 .ASCIZ<12><15>/EACH CPU SHOULD REPORT A POWER FAIL/ 
3989 042256 020110 050103 020125 
042264 044123 052517 042114 
3991 042272 051040 050105 051117 
3992 042300 020124 020101 047520 
3993 042306 042527 020122 040506 
042314 046111 
3995 042317 015 005012 042507 TM106: .ASCiZ <CR><LF><LF>/GET SET TO POWER FAIL MEM BOX @ / 
399% 042324 020124 042523 020124 
3997 042332 04752 053517 
042340 051105 043040 044501 
3999 042546 020114 042515 020115 


4000 ofStes ~ 020130 
4002 042363 012 006412 ge280 T™™107: .ASCII<12><12><15> /PUT BATTERY BACKUP ON ALL MEMORY BOXES/ 


2 040515 042513 -ASCII<12><15>/MAKE ALL MEMORY PORTS ONLINE/ 
6114 6440 


1 
é 

2 -ASCI1<12><15>/MAKE ALL CPU POWER-UP SWITCHES "RUN OR HALT’’/ 
7 
0 


! -ASCI1<12><12><15>/THEN POWER FAIL THE MEM BOX/ 


041040 
4027 042606 005012 G2 tei3 051505 -ASCI1<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


042644 
4033 042652 051105 043040 044501 
34 660 


14 

12 052015 042510 -ASCI1<12><15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 
16 054524 042520 

40 054516 041440 


MAINDEC-11-CEKBG-8 
CEKBGB.P11 


PDP=11/70 


O5-JUN-79 09:14 


054522 


Om NAM AO 
ad ad 
RASN=S255 
—"“INONOMNSUNU 


pee 


044124 
020115 


020122 


042522 
020105 
042515 
050040 


052103 


000 
052520 
052124 

50 


052123 
046101 
047515 
051117 


™108: 


F 7 
74 SYSTEM POWER FAIL MACY11 30A(1052) O6-JUN-79 09:12 PAGE 95 
DATA AREA 


-ASCI1Z<12><15>/EACH CPU SHOULD REPORT A POWER FAILURE/ 
e-ASCI1<12><12><15>/PUT BATTERY BACKUP ON ALL MEMORY BOXES/ 


-ASCI1<12><15>/MAKE ALL MEMORY PORTS OFFLINE ON MEM BOX TO BE POWER-FAILED/ 


-ASCI1<12><15>/MAKE ALL CPU POWER-UP SWITCHES "RUN OR HALT"'/ 


eASCI1<12><12><15>/THEN POWER FAIL THE MEM BOX/ 


-ASCI1<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


-ASCI1<12><15>/RESTORE ALL MEMORY PORTS ONLINE/ 


SEQ 0109 


MAINDEC=11-CEKBG-8 
CEKBGB.P11 


4119 


05-JUN-79 


051524 
047111 


G 9 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 96 
09:14 DATA AREA 


eek? 046116 


40 
053517 051105 
044501 052514 


000 
005015 040527 
047111 035107 


044415 020125 
043517 040522 


124 020105 
053111 020105 
6114 0410 


020125 020043 
00641. og 


020123 042524 
000 
006412 044504 


$PGM1: 


$PGM2 : 


$PGM3: 


NODE V : 


™109: 


™110: 


eASCI1<12><15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 


~ASCIZ<12><15>/NO CPU SHOULD REPORT A POWER FAILURE/ 


-ASCIZ <12><15><12>/WARNING: DRIVE & / 


-ASCIZ<12><15> /ON CPU # / 


-ASCII <12><15>/1S PROGRAMMABLE OVER BOTH A AND B PORTS/ 


-ASCIZ<12><15>/THE DRIVE WILL BE USED LATER IN THIS DIAGNOSTIC/ 


eASCIZ <12><15>/NO MASSBUS DEVICES ON CPU # / 


eASCIZ <12><12><15>/0NLY ONE MEMORY BOX ONLINE SKIPPING THIS TEST/ 


-ASCI1<12><12><15>/DI SABLE BATTERY BACKUP ON MEM BOX TO BE POWER-FAILED/ 


SEQ 0110 





MAINDEC-11=CEK 
CEKBGB.P11 


BG-8 


PDP=11/70,74 SYST 
QS=JUN=79 09:14 D 


042522 


044501 
051505 


047111 
051505 


051105 


H 9 
EM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 97 
ATA AREA SEQ 0111 


-ASCII<12><15>/PUT ALL SLAVE CPU MEM PORTS ONL INE/ 
-ASCI1<12><15>/MAKE MASTER CPU MEM PORT OFFLINE ON BOX TO BE POWER-FAILED/ 
-ASCII<12><15>/MAKE ALL CPU POWER-UP SWITCHES "RUN OR BOOT''/ 


-ASCI1<12><12><15>/THEN POWER FAIL THE MEM BOX/ 


eASCII<12><12><15>/RESTORE POWER 5 SECONDS AFTER POWER FAIL/ 


-ASCI1<12><15>/RESTORE ALL MEM PORTS ONL INE/ 


-ASCI1<12><15>/RESTORE ALL CPU POWER-UP SWITCHES TO “RUN OR HALT''/ 





x 
MAINDE C-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O06=JUN=79 09:12 PAGE 98 
CEKBGB.P11 05-JUN=79 09:14 DATA AREA 


4206 044556 052455 020120 
04 4103 


SEQ 0112 


eASCII<12><15>/THEN TYPE ANY CHARACTER AT THE MASTER CONSOLE/ 
4215 044642 051105 040440 020124 


tS50 044672 006412 BtReuz mgd hty -ASCIZ2<12><15>/EACH SLAVE CPU SHOULD REPORT AN INTERRUPT / 


4227 044746 006412 050103 020125 M111: .ASCIZ<12><15>/CPU INTERRUPTED AS EXPECTED/ 


90010 : 
4232 045004 006412 047520 042527 $DOWN: .ASCIZ <12><15>/POWER DOWN TIME WAS UNDER 2 MILISECONDS / 


4240 045057 015 052412 042516 EMI: eASCIZ <CR><LF>/UNEXPECTED POWER FAILURE ON CPU/ 
4241 050130 041505 042524 

4242 045072 020104 047520 042527 

4243 0451 020122 0405 046111 

4244 045106 051125 020105 047117 

4245 045114 041440 052520 

4246 045121 015 052412 2516 EM2: eASCIZ <CR><LF>/UNEXPECTED POWER UP SEQUENCE ON CPU/ 
4247 045126 050130 041505 042524 

4248 045134 020104 047520 042527 

4249 045142 020122 050125 051440 

4250 045150 050505 042525 041516 

4251 045156 020105 047117 041440 

4252 045164 052520 

4253 0645167 015 044412 046114 EM3: eASCIZ <CR><LF>/ILLEGAL POWER DOWN SEQUENCE ON CPU/ 
4254 045174 043505 046101 050040 

4255 045202 053517 051105 042040 

4256 045210 053517 020116 042523 

4257 045216 052521 047105 042503 

4258 045224 047440 020116 050103 

4259 045232 000125 

4260 045234 005015 046111 042514 EM4: eASCIZ <CRO<LF>/ILLEGAL POWER UP SEQUENCE / 

4261 045242 040507 020114 047520 


J . 
MA INDE C-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY17 30A(1052) O6=JUN=79 09:12 PAGE 99 
CEKBGB.P11 O5S=JUN=79 09:14 DATA AREA 


020122 


SEQ 0113 


<CR><LF>/UNEXPECTED TRAP TO 4/ 


<CR><LF>/UNEXPECTED TRAP TO 10/ 


020117 

052412 : <CR><LF>/UNEXPECTED TRAP TO 114/ 

041505 2524 

051124 

020117 030461 
051104 $ <CR><LF>/ADDRESS ON STACK IS WRONG/ 
047117 

045503 

651127 


<CR><LF>/OLD PS IS WRONG/ 
<CR><LF>/ODD ADDRESS TRAP FAILED/ 


042514 
047515 na <CR><LF>/MEMORY CORRUPTED ON POWER FAIL/ 


<CR><LF>/TIMEOUT TRAP FAILED/ 


<CR><LF>/POWER FAIL RETURNED TOO SOON/ 


atts : ° <CR><LF>/NOT ENOUGH OR TOO MANY INSTRUCTIONS EXECUTED/ 
7524 


<CR><LF>/NO MEM, MANG. VIOLATION OR TRAP TO 4/ 
046440 





K e 
MAINDEC-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O06=JUN=79 09:12 PAGE 100 
CEKBGB.P11 05-JUN-79 09:14 DATA AREA 


4318 045730 047101 027107 053040 

4319 045736 047511 040514 044524 

4320 045744 047117 047440 020122 

4321 045752 051124 050101 052040 
32 5760 000064 


04 
4323 045764 005015 047516 044440 EM20: .ASCIZ <CR><LF>/NO IIST INTERRUPT/ 


SEQ 0114 


046006 124 

4327 046010 005015 047111 047503 EM21: .ASCIZ <CR><LF>?INCORRECT BRK AND/OR DCF FLAGS? 
04604 000 

ost? 046051 015 041412 052520 EM22: .ASCIZ <CR><LF>/CPU DID NOT TRAP TO VIRTUAL 24/ 


046106 03 000064 
4339 046112 005015 044103 041505 EM23: -ASCIZ <CR><LF>/CHECKSUM ON MASSBUS TRANSFER IS WRONG/ 


4341 046126 020116 040 051523 
4342 34 052502 020123 051124 
4343 046142 04 04 051105 


4346 046162 006412 047516 050040 EM24: .ASCIZ <12><15>/NO POWER FAIL ON CPU/ 


046204 000 
4350 046211 012 052415 peSene EM25:  .ASCIZ <12><15>/UNEXPECTED CPU INTERRUPT/ 
4352 046224 020104 050103 020125 
4353 046232 047111 042524 051122 
4354 046240 050125 000124 


4356 046244 005015 044511 052123 DHS: eASCIZ <CR><LF>/IISTID PC CPUERR/ 
046252 2 
$3) 046277 015 020012 044440 DH/7: -ASCIZ <CR><LF>/ IISTID ERRORPC CPUERR MEMERR/ 


4366 046334 020040 046440 046505 


0001 
4368 046346 005015 042524 052123 DH10: .ASCIZ <CR><LF>/TESTNO ERRORPC/ 
4369 046354 047516 020040 042440 
4370 046362 051122 051117 041520 


4372 046371 015 052012 051505 DH11: .ASCIZ <CR><LF>/TESTNO ERRORPC PS/ 
4373 046376 047124 020117 020040 





MAINDEC=11-CEKBG-8 


PDP=11/70 


CEKBGB.P11 O5=JUN=79 09:14 


051105 


000000 
014240 
020133 


050122 
020040 


051505 


051117 
052123 
2440 


050040 
052123 


014250 
014250 


000000 
014240 


014250 
014250 
000000 
014250 
014064 


045517 


- 
.74 SYSTEM POWER FAIL MACY11 30A(1052) O6-JUN=79 09:12 PAGE 101 
DATA AREA 


eASCIZ<12><15>/TESTNO ERRORPC PAGE ADDRESS REGISTER OF BAD MEMORY/ 


<CR><LF>/TESTNO ERRORPC CPUERR/ 


<CR><LF>/TESTNO IISTID ACR PGTE PGCS/ 


<CR><LF>/TESTNO IISTID FOUND SHOULD BE/ 


<CR><LF>/TESTNO IISTID ERRORPC / 


-EVEN 
$REGO, SERRPC ,$REG1,0 
$REGO, SERRPC ,$REG1, $REG2,0 


$TSTNM, SERRPC 0 
$TSTNM,SERRPC ,$REGO,0 


STSTNM, SERRPC ,$REG1,0 

$TSTNM, SREGO, SREG1 , $REG2,$REG3,0 
$TSTNM, $REGO, $REG1, $REG2,0 
$TSTNM, SREGO, SERRPC 0 

eASCIZ <CR><LF>/C OK) / 


SEQ 0115 





M 6 
MAINDEC-11=-CEKBG-8 PDP=11/70,74 sa Any FAIL MACY11 30A(1052) O6-JUN=79 09:12 PAGE 102 


CEKBGB.P11 O5=JUN=79 09:14 SEQ 0116 


056440 020040 000 
047052 


-EVEN 
001000 ERRBUF: .BLKW 1000 ERROR ASCII MSG STORAGE AREA 
020000 DSKBUF: .BLKW 20000 ;MASSBUS BUFFER AREA 
000000 END: 0 


111052 












N 9 
MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 103 
CEKBGB.P11 O5=JUN=79 09:14 DATA AREA 


4435 
4436 000001 - END 


SEQ 0117 


8 
MAINDEC-11-CEKBG-8 = hala 74 SYSTEM POWER FAIL MACY11 30A(1052) 06-JUN-79 09:12 PAGE 105 
CEKBGB.P11 05-JUN-79 09:1 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0118 


ga 1821 18274 
00C 900 722 763 


1114 1124" 1145 1154s 
1778* 1784 1868 1932s 
2355* 2406" 2464s 2563*  2621* 


css 


cs: 


nnnnnnnn 


gee 


000000 
000000 
ADEVCT= 000000 
ADEVM = 000000 722 
ADR 017024 1446* 1147* 1152 
193 1939 


: * 1156* 1194* 


1155 
1951 2307* 2310* 2312% 2465* 2468% 





MAINDEC-11-CEKBG-8 
O05-JUN-79 09:1 


CEKBGB.P11 
AVECT1= 000000 


BF ADR 17034 
ITO = 000001 
1T00 = 000001 

B1T01 = 000002 

BITO2 = 000004 

BITO3 = 000010 

BITO4 = 000020 

BITOS = 000040 

BITO06 = 000100 

B1T07 = 000200 

B1T08 = 000400 

BITO9 = 001000 

BIT1 = 000002 

BIT10 = 002000 

BIT11 = 004000 

BIT12 = 010000 

BIT13 = 020000 

BIT14 = 040000 

BIT15 = 100000 

BIT2 = 000004 

BITS = 000010 

BIT4 = 000020 

BITS = 000040 

BIT6 = 000100 

BIT? = 000200 

BIT8 = 000400 

BIT9 = 001000 

BMSK 017032 

BOOT 014526 

BOXNUM 014646 

BPTVEC= 000014 

BUFCLR 032322 

CACHVE= 000114 

CKSUM 014650 

CONTRL= 177746 

COUNTO 016754 

COUNT1 016756 

COUNT2 016760 

COUNT3 016762 

CPUACT 016766 

CPUER 040362 

CPUERR= 177766 

cPO = 000001 

cP1 = 000002 

CP2 = 000004 

cP3 = 000010 

CR = 000015 


722 


oS CON ON 


SVVILLLs SVs ee cs 


ae ad ad ee aed ced ae ai ad aD 
N@OO—MWEUW Nm 


501 


3726 


1928 


2117 
1073 


2853 


3819 


3828 


3832 


C1 
4 baie 74 SYSTEM POWER FAIL MACY11 30A(1052) 


2424 
2708* 


2115* 


3838 


tia 09:12 PAGE 106 
CROSS REFERENCE TABLE -= USER SYMBOLS 


1218 


1434 
1636 


1829 


2445 
2720 


2118* 
2980* 
3085* 


3845 


1236 


1440 
1658 


1836 
2557* 


2119* 
2995* 
3087 


3852 


2163 
2308 


1778 


1460 
1666 


2804 
2581 


2131 
2996* 


3863 


2466 


1868 


1468 
1688 


3374 
2602 


2149* 
3060 


3870 


2623 


1971 


2747 


3879 


2869 


2040 


2153* 


2043 
3271* 
1734 


3891 


SEQ 0119 


2167 


2046 
1800 


3905 


MAINDEC=11=CEKBG-8 


CEKBGB.P11 


CRLF = 
C1 


000200 


O5-JUN-79 09:14 


3915 
4274 
4356 


1044* 


3929 
4284 
4368 


1944 
675 
968 


3546* 
: 


D 10 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 0 
CROSS REFERENCE TABLE == USER SYMBO 


3941 
4292 
4387 


1010 


3947 
98 
4392 


* 
as) 


1016 


3562* 


1017 


3995 
4302 
4400 


43684 


3577* 
1450* 
2182* 


44184 


4240 
4308 
4407 


35904 
1490* 
2198* 


Cpanel 09:12 PAGE 107 


4246 
4316 
4429 


1519s 
2249* 


4253 
4323 


1565* 
2340* 


SEQ 0120 
4260 4265 
4327 4333 


1589* 1619% 
2356* 2407* 





MAINDEC-11-CEKBG-8 


CEKBGB.P11 


014702 


000010 
014540 


ReKKKK 


040032 
177742 
014550 


014532 
177752 
100000 


OS-JUN-79 09:14 


2924 


2608 
189 


1164* 


1928* 
1222 


2975 


28044 


1934* 
1224* 


3064 


32814 


3806 
1848* 


3114 


2293* 


3229 


2274 
2711* 
2643* 


2451* 


1473* 
1712* 
2776* 
3310* 


2402 


2608* 


2415* 


3435 


2369 
2779 


‘ 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6-JUN=79 09:12 PAGE 108 
CROSS REFERENCE TABLE =-- USER SYMBOLS 


3798 


2370 
2782 


1522" 
1800* 


2518 


3799 


2430 
3026 


1541* 
2201* 


2559 


3800 


2431 
3627 


SEQ 0121 


1591* 
2252* 


2572* 


3801 


2432 
3028 





Fi 
MAINDEC-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=-79 09:12 PAGE 109 
CEKBGB.P11 O5-JUN-79 09:14 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0122 


2735* 2841* 3016*  3026* 
2737* 2843* 3018*  3027* 
2739* 2845* 3020*  3028* 


MrPoNNnnrruwnnnrn 
y Ww Ww 


ronrr 
WWW 
Yn 
ANOS 


7 
7 
7 
7 
1 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
7 


ronrononononor 


170306 








MAINDE C= 
CEKBGB.P11 


MAPH22= 
MAPH2 3= 
MAPH24= 
MAPH25= 


1= 
e= 
3- 
4= 
S= 
6= 
7= 


EEE 


oe 
3 


170312 


170220 


G 10 
11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 170 
O5-JUN=79 09:14 


CROSS REFERENCE TABLE == USER SYMBOLS 


2971 3068 3110 


2926 2973 3066 3112 


SEQ 0123 





H 10 
MAINDE C-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=-JUN=79 09:12 PAGE 111 


CEKBGB.P11  05=JUN-79 09:14 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0124 

MAPLS = 170224 466" 

MAPL6 = 170230 4684 

MAPL7? = 170234 470# 

MBDSW 014632 1 1812* 1815" 1825* 1835" 1836* 208 2107 2139 2863 

33274 2116 = 2123-2148 = 2160 = 28604 

MEMERR= 177764 2194 2833 2836* 

MEMSIZ 032076 2243 ©2401 Ss 2558 = 26 90H 

MMERR 033270 or, 2854 2856 2857 2870" «= 2871* += 2872* 2873" += 2874" + 2875* 2876* 2877 2878 
* 

MMRO = 177572 242 2466 —-1716* ~=—-1732* = 2205* «= 2213* = 2218 = 2275* «= 2323S 2327" «=. 2363" = 2371* ~=—- 2376 


2433* 2481 2485* 2520* 2528* 2533* 2590* 2638 2642e 2755% 2772% 2787* 27918 


MARI = 177574 2434 247 
MMR2 = 177576 2444 248 
MARS = 172516 2454 249 2743* 2853* 1 2979* 3024* 3061 3118* 
MMVEC = 000250 2134 = 1714% =. 2744% = 2854% = 330025 * 
MPE 016737 8444 1073* 1079* 1102 1220 1738 2993 3162 3197 3675 
WW = 000100 5084 1062 1069 

MSTENT 021174 1182 11964 
MSO 021312 1204 12204 
atc = 15 4904 
uCX = 53 1910 2012 2103 
NODEV 043732 2088 41344 

017004 8614 1957* 2226% 2319% 2384% 2477 2541% 2634% 2821% 3399" 3682 3685* 
NORH70 024466 18224 1852 
NORP 024634 1797 18514 

= 000 53 

NXTDRV 024450 1804 1809 1811 18174 

047036 2302 2460 2617 44298 
PARERR 033074 1268 28284 
PARFLG 033076 1269* 2829H  2837* 
PATCHK 014530 7964 2277% 2321% 2435% 2479% 25928  2636% 2759 
PATTRN 032434 2278 2322 2436 2480 2593 2637 27478 
PFDT 014622 8164 
PFFT 014612 A sg 1711* 19108 20128 2703* 2200* 2251 2358% 2409% 2515% 2566*  2676* 3046 
PGCS = 000001 4824 1151 1193 1929 
PGF = 000005 4864 
PGTE = 000000 4814 1145 1226 1938 2306 2464 2621 
PIRQ = 177772 1004 
PIRQVE= 000240 2124 

033530 1267 1471 1551 29064 2988 

034012 2942 29634 
PRO = 1334 
PR1 = 0 1344 
PR2 = 000100 1354 
PR3 = 000140 1364 
PRG = 200 1374 
PRS = 000240 1384 
PR6 = 300 1394 
PR7 = 000340 1404 
PS = 177776 974 98 1283* 1293* 1321% 1356* 1366* 1391* 1401* 1426* 1451* 1462" 14918 

1502* 1520* 1532* 1566* 1590* 1601* 1603* 1620* 1631* 1633* 1650" 1661* 1663 
1680* 1691* 1693* 1710* 2891 

PSW = 177776 984 1195" 21928 235Cx 2507* 2919 2981* 3059 3120* 
PuT 017054 8754 1033" 1897 1945 1999» 2068+ 


T 10 
MA INDE C-11=CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 112 
CEKBGB.P11  05=JUN=79 09:14 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0125 
PWRDIS 060340 1047 1270 «= 1479S 3808 
PWRFL 014522 a9" 2222 2241 2298 2315 2380» 2399* 2456 = 2473S 2537 2556" = 2613S 2630 
PWRTAB 014662 B26" 1267* «= -1464* 1471" 1544" 1551" 1796" = .2818* — 2906* =. 2942* =. 2964 §=—- 298B8* = 3042 
3045" 3077" 3103" 3131" 3810 

PWRVEC= 000024 205# 1047" 1048* 12708 1271« 
P21 026216 096 2099" 
RELODN 014536 799# 2216 «= -2219® = 2326* 2374 = 377% = 24B4* = 2531 2534" = 2641* 
RELOHI 032576 2268 2426 «= 2583 775# 
RELOLO 032722 2325 = 2483 2640 8794M 
RELOUP 014534 7584 2207 2214 22718 2365 = 2372* 2429" 2522, 2529" = 2586 
RESTAB 036616 3171 78 (34438 
RESTRT 020000 568 1022" 3269 
RE SVEC= id 2 
ROUTE 014562 8074 3778* 3780 
RPAS = 176716 521a 

= 176704 S16# © 2865* 
RPCC = 176736 529" 
RPCS1 = 176700 514H@ = 2113* «2122 «= 2147" 2159% 2861 += 2869" =. 2882 
RPCS2 = 176710 5184 1799" 1802* 1813 1828*  2863« 
RPDA = 176706 517# ©2866* 
RPDB = 176722 5234 
RPDC = 176734 5284 
RPDS = 176712 519@ 1803 1806 1810 1829 2867 2880 
RPDT = 176726 525a 
RPEC1 = 176744 5 32a 
RPEC2 = 176746 5334 
RPER1 = 176714 520" 
RPER2 = 176740 5304 
RPER3 = 176742 53ia 
RPLA = 176720 522M 
RPMR = 176724 5244 
RPOF = 176732 5278 
RPPGM 016742 8464 1808* 1820 
RPSN = 176730 52 
RPSRC 024 18024 181 
RPWC = 176702 515#@  2864* 
SAVRG 014552 B05# 3772" 3779 
SAV6 014572 810# 2935* 2965 3075" 3104 
SDPARO= 172260 3304 
SDPAR1= 172262 3314 
SDPAR2= 172264 3329 
SDPAR3= 172266 3334 
SDPAR4= 172270 3344 
SDPARS= 172272 3354 
SDPAR6= 172274 3364 
SDPAR7= 172276 3374 

= 172220 0 
SDPDR1= 172222 309" 
SDPDR2= 172224 3104 
SDPDR3= 172226 3114 
SDPDR4= 172230 3124 
SDPDR5= 172232 3139 
SDPORG= 172254 14a 


SDPDR7= 172236 3154 
SEC2 024176 1274 1767#@ 8§=1769 


10 
MAINDE C=11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30a(1052) O6-JUN=79 09:12 PAGE 113 


CEKBGB.P11  05=JUN-79 09:14 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0126 
SED = 0002 5414 
SETCLK 033440 28878 
SETMM 032340 2209 2367 «= 2526.-~S ss 2735# = 2751S 2775 
SEU = 0001 5428 
SID = 00 539" 
SIGNAL 01 B20# 1913" 1935* 2014* = 2029 = 2105" = 2134" «= 2770 «= -3048* = 3129 
SIPARO= 172240 3198 

SIPARI= 172242 320" 
SIPAR2= 172244 3214 
SIPAR3= 172246 3228 
SIPARS= 172250 3234 
SIPARS= 172252 324a 
SIPAR6= 172254 3054 
SIPAR7= 172256 326H 
SIPDRO= 172200 297# 2922 2977 3062 3116 
SIPDR1= 172202 2988 
SIPDR2= 172204 2998 
SIPDR3= 172206 30 
SIPDR4= 172210 3014 
SIPDRS= 172212 3024 
SIPDR6= 172214 3034 
SIPDR7= 172216 3048 

IU = 5404 
SIZEHI= 177762 2298 
SIZELO= 177760 2278 
SIZEND 024600 1816 1826 18444 
SIZMBS 024340 17978 
SLVENT 021110 1127-11838 
SLVID 014644 8218 1185" 1186 
SL 021232 1205. 12084 
SL2 021252 1206 12128 
SL3 021272 1207-1216 
SRO = 177572 2464 
SR1 = 177574 247# 
SR2 = 177576 2488 
SR3. = 172516 2498 
SSD = 5434 3046 
SSU_ = 000020 5444 1910 2012 2103 3127 

STACK = 013776 91# (92 93 % 677 «678 £6799 680 

START 014502 9f20H 2259 24172574 2699 2700 27012708 2707 270927112713 e749 
STCS = 000003 444 

STF = 000006 4878 
STKLMT= 177774 998 

TOP 014462 787# 1027 2696* 2697* 2698" 2704 2706" 2707" 2757 

STRT_ 020064 566 569—Ss«1037# 

STS17 025264 1934 1943 
STTE = 000002 4834 
STO. 021046 1104 1174a 

SUPSTK= 013576 934 

SWR 014160 669# 1058* 1061* 1062 1067s 1083 1084 +=: 1089-—S's«+1093)—S—s«1095-s1106—Ss«21177 

1227 1272S s«1312)—S'i—«*1349)—S's—«*d:382~—Sss1416 1444S s«14482)—s1571S «15571581 s«1611—Ss«*1641 
1671 1701 «17352304 = 2462 2657 —-3302-—S's«3318 = 3359S 337K 

SWREG 000176 5534 

SwO = 000001 1684 

SwOO = 000001 1584 168 


MAINDEC-11-CEKBG-8 
CEKBGB.P11 
swo1 = 000002 
SWO2 = 000004 
SwO3 = 000010 
SWwO4 = 000020 
SwoS = 000040 
SwO6 = 000100 
SwO7 = 000200 
SwO8 = 000400 
Swo9 = 001000 
Swi OCs 2 
SwW10 = 002000 
SWil = 000 
SW12 = 010000 
SW13 = 020000 
SW14 = 040000 
SW1S5 = 100000 
SW2 = 000004 
SW3 = 000010 
SW4 = 000020 
Sw5 = 000040 
SW6 = 000100 
SW7 = 000200 
SWB = 0004 
Sw9 = 001 
SYNC.1 014712 
SYNC.2 014714 
SYNC.3 016770 
SYSTID= 177764 
S2L0G1 016716 
S2L0G2 016720 
L1 017020 
TBITVE= 14 
I = 004 
TIMIT 034202 
TKVEC = 
™1 040376 
™10 040726 
™100 041507 
™101 041533 
™102 041604 
™103 041635 
™104 1700 
™106 042317 
™107 236 
™108 301 
™109 043771 
™11 040761 
™110 044053 
™111 4746 
™12 040772 
™13 041024 
™14 041370 
™15 041420 
T™™2 0461 


05-JUN=79 09:14 


N 
R 


ee ee ee ee 
— 


a Pe ee 
WIS OO OA OO OS 
WO — NWO 


1095 
2657 


1349 


4227# 


kK 10 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 114 
CROSS REFERENCE TABLE == USER SYMBOLS 


1272 


1382 1416 1444 1482 1511 1557 1581 1611 


1959* 2015* 2020* 2104* 2155 3130* 
2056* 2093* 2110* 2136* 2141* 2678* 2682* 2684 
2185* 2188* 2343% 2346* 2500* 2503* 2680*  2683* 


1844* 
2012 2103 2676 


39254 


2478 2542 2635 39414 
39954 


1641 


3160* 


SEQ 0127 


1671 


3167* 





L 10 
MAINDE C-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) gatas 09:12 PAGE 115 


CEKBGB.P11 O5S-JUN=79 09:14 CROSS REFERENCE TABLE == USER SYMB SEQ 0128 

™™% 0405 1097 38324 

™5 040550 1100 38384 

TM6 040616 1082 38454 

™? 04 1080 38524 

™76 041450 1116 39194 

™77 041476 1900 2002 2073 2235 2393 2550 2668 39234 

TPVEC = 000064 2094 

TQL1 017016 8644 3686* 3702* 3712* 3752* 

TRAPVE= 000034 2074 1045* 1046* 

TRTVEC= 000014 2024 ; 

TsT1 021420 1200 1201 1202 1203 1211 1215 1219 12654 1313 3443 3444 3445 3446 

TST1O 022732 15184 1558 

TST11 = 023130 15644 1582 

TST12 023222 15884 1612 

TST13. =©023356 16184 1642 

TST14 =023512 16484 1672 

TST1S 023646 16784 1702 

TST16 024002 17084 1736 

TST17 = 024644 1849 18624 1916 1921 1942 1961 

TST2 021654 13194 1350 

TST20 025362 18 19664 2017 2031 

TST21 025704 1983 20354 2094 2111 2137 2144 2173 

TST22 026632 2052 21814 

TST23 027654 206 2246 2258 23394 

TST24 0676 2364 2404 2416 24964 

TST25 031720 2521 2561 2573 26544 

TSTS 022014 13544 1383 

TST4 022146 13894 1417 

TSTS 14244 1445 

TST6 022414 14494 1483 

TST7 06 14894 1512 

TSI7A = 025014 1888 18964 

TS17B) = 025136 1890 19244 1926 

TS20A 025532 1991 19984 

TS20B 025634 1993 20194 2021 

TS21A 026054 2060 20674 

TS21B 026434 2062 

TS22A 027106 2195 22324 

TS22B 026716 21 21974 2215 2217 2220 2225 2228 

TS23A 030130 2353 

TS238 027740 2352 23554 2373 2375 2378 2383 2386 

TS24A 031152 2510 25474 

TS248 30762 2509 25124 2530 2532 2535 2540 2543 2823 

TS25A 1766 2663 26654 

TS25B 032020 2 26764 

TYPDS = 104405 1118 1140 1824 1839 1842 010 2090 2101 2283 2441 2598 3192 
3207 16 3225 3234 3242 38024 

TYPE = 104401 1 1056 1080 1082 1088 1 1092 1097 1100 1116 1137 1138 1141 
1277 80 1281 1776 1822 1837 1840 1843 1900 9 9 1927 1958 
2 2008 2011 2022 2073 2088 2091 2092 2099 2102 2143 2157 2172 


2550 2595 2600 2617 2635 2668 2674 2675 2686 2724 2822 3009 186 
3193 2 3208 3209 3217 3218 3226 3227 3235 3236 3243 3363 
3405 3407 3412 3414 3433 3438 3568 3650 37984 

TYPIT 040236 3727 3729 3731 3733 3735 3748 37604 3761 


TYPLCK 017056 8764 1034* 3398*  3439* 3669 


MAINDEC-11-CEKBG-8 
OS-JUN-79 09:14 


CEKBGB.P11 


014716 
UBCR2 = 170016 
UBEF 016740 


017014 


YY 014524 
SAFRK = 
THD 000230 
SASTAT= ***%%% 
SATYC 036652 
SATY1 036626 
SATY3 036634 


3431 


2917 


32404 


3051 
3422* 


37994 


2982 


3425* 


3057 


3426 


3121 


3429s 


M 10 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 
CROSS REFERENCE TABLE == USER SY 


3430 


0 
MBOLS 


6-JUN-79 09:12 PAGE 116 


2671 38004 
3689 


SEQ 0129 





MAINDEC-11-CEKBG-8 


CEKBGB.P 


$23 
Ra 


P11 O5-JUN=79 09:1 


036644 3385 
014154 6664 
014412 7634 
014114 647 
014140 6604 
014416 7654 
014420 76 
kekkee | 3805 
014000 6004 
000005 6 
000012 6 
000005 6944 
000005 7064 
014226 6904 
2808 
014364 7374 
014333 7164 
3226 
037614 3615 
014422 7674 
014424 7684 
014446 7774 
014450 7784 
014452 7794 
014454 7804 
014456 7814 
014460 7824 
014426 7694 
014430 7704 
014432 771# 
014434 7724 
4436 7734 
014440 7744 
014442 7754 
14444 7764 
014346 7284 
014414 7644 
035654 3182 
5004 3009 
037604 3618 
035644 560 
035200 1180 
035754 32794 
014356 73 
014357 7344 
35060 1740 
035166 1180* 
014134 6554 
014 6064 
014224 6894 
014060 6314 
036164 1043 
014064 6354 
014074 6394 
017062 8934 
036404 33944 


34554 


N 10 
thecal SYSTEM POWER FAIL MACY11 30A(1052) 


CROSS REFERENCE TABLE == USER SYMBOLS 


7004 
7004 


7084 
1119* 
3283 


7024 

7024 

7094 
1142 


1137 
3407 


32634 


7044 
7044 


3161 


3175 
3336 


4414 


7064 

7064 

7114 
1788 


1823 1841 


1909 2011 2091 
3438 


3276* 
3350* 


4416 4418 4419 


06-JUN=79 09:12 PAGE 117 


SEQ 0130 
1907 1946 2009 2089 2100 
2102 2674 3199 3208 3217 
4421 4427 





MAINDEC-11-CEKBG-8 


CEKBGB.P11 05-JUN-79 09: 
SERTTL 014042 6224 
SESCAP 014322 7114 
T 014356 7324 
SETEND 014462 592 
SFATAL 014340 7254 
SFFLG 037072 3452* 
SFILLC 014222 6874 
SFILLS 014221 6864 
SGDADR 014104 6434 
SGDDAT 014124 6514 
$SGET 035634 3252 
SGET42 035624 32534 
$GT = eeeeee 3804 
$HD = 11 
SHIBTS 230 5874 
SICNT 014012 6104 
SILLUP 035050 3045 
SINTAG 014155 6674 
SITEMB 014054 6274 
F 14334 7174 
$LFLG 037071 3493* 
SLPADR 014022 6144 
SLPERR 014032 6184 
SMADR1 14370 7504 
SMADR2 014374 7544 
SMADR3 4400 7574 
SMADR4 014404 7604 
SMAIL 014336 588 
SMAMS1 014 7444 
SMAMS2 014372 7524 
SMAMS3 014376 7554 
SMAMS4 014402 7584 
SMBADR 232 5884 
SMFLG 037070 3453* 
SMSGAD 014352 7304 
SMSGLG 014354 7314 
SMSGTY 014336 7244 
SMTYP1 014367 7454 
SMTYP2 014373 534 
SMTYP3 014377 7564 
SMTYP4 014403 7594 
SNULL 014220 6854 
SNWTST= 1 12624 
17054 
SOCNT 037 3538* 
SOMODE 037370 3533* 
SOVER 036150 3303 
ASS 014344 7274 
SPASTM 000236 5904 
1 043535 1837 
3563 840 
043577 1843 
R 034220 1782 
SPSWR 014 8254 
SPWRDN 034412 1796 
034676 3077 


3206 
1197* 


32564 


592 


ANNO A@WEE HE SWAP ew 
—-woo0--—|-) —-WMNMN Own 
RONND@AS BVNROON 
Fay ae tas oa ret 44 


3215 
3331* 


3483 


3384 


3329* 
3321 


7234 


3224 
3377 


3492* 


3490 


3334 
33 


30* 


3325 


B11 
iS balla 74 SYSTEM POWER FAIL MACY11 30A(1052) 
14 CROSS REFERENCE TABLE -= USER SYMBO 


3233 
3379 


35004 


3336 
3336 


3491* 


3275* 


genset 09:12 PAGE 118 


3245 3353* 

3376 

2172 2686 

14464 14864 15154 15614 15854 16154 
23364 24934 26514 

35894 

3279 


16454 


SEQ 0131 


16754 


ako as 


KBGB.P11 O5-JUN=79 09:14 


SQUES 014332 
SRDCHR= *eeaxe 


DOCT= xexxxee 
SREGAD 014236 
SREGO 014240 
SREG] 014250 
$R 014260 


STMPO 014310 
STMP1 014312 
STMP2 14 


$TPB 014216 


000006 

$STRPAD 040320 
234 

STSTNM 014002 


STYPBN= ***ee% [J 


$TYPOS 037074 


4416 
2764* 
2833* 


2449 


4419 
2832 
4416 


2454 


C 11 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 
CROSS REFERENCE TABLE == USER SYMBOLS 


4423 
3814* 
4425 


2606 


2004 
3295 


06=JUN=79 09:12 PAGE 119 


2611 


2019* 
3324* 


4427 
4416 


2729 


2067* 
3327 


4421 


2075 
3333 


4423 


2138* 
3336 


4425 


2237 
3423 


SEQ 0132 


2342* 
4418 


MAINDE C-11-CEKBG-8 
O5-JUN=79 09:14 


CEKBGB.P11 
SUNIT 014350 


$GET4= 


$ 000001 
S$STP) 014200 


SOFILL 037367 


SGOCAT= xxexnee 


= 111054 
-IIST = 000000 
-SASTA= «eee 
-$x = 000230 


U 


U 


1179 1208 
1501 509 
1733 1779 
3053 3170 
3546 35884 
558 5594 
10214 1113 
1410 1414 
1720 1950 
33704 35014 


1212 1216 
1568 1580 
1867 1970 
3277 

5614 5634 
1149 1178 
1432 1458 
2330 2488 
36594 44124 


2 
44314 


30 
44324 


’ 
PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN-79 09:12 PAGE 120 
CROSS REFERENCE TABLE == USER SYMBOLS 


SEQ 0133 








E 11 
MAINDE C-11-CEKBG-B PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 122 
CEKBGB.P11 O5-JUN-79 09:14 CROSS REFERENCE TABLE == MACRO NAMES 


AF ORK 184 1865 1968 2037 


2660 
BLK 6024 611 615 619 623 636 640 644 648 652 661 670 674 712 
607 632 656 


SEQ 0134 


MA INDE C-11-CEKBG-8 
E ° 0S-JUN-79 


3290 


3764 
3591 
3506 


PDP=-11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) 
09:14 CROSS REFERENCE TABLE == MACRO NAMES 


O6-JUN=79 09:12 PAGE 123 


3224 3233 
2907 

1623 1653 
1585 1615 





G 
MAINDEC-11-CEKBG-8 PDP=11/70,74 SYSTEM POWER FAIL MACY11 30A(1052) O6=JUN=79 09:12 PAGE 124 
CEKBGB.P11 O5S=JUN=79 09:14 CROSS REFERENCE TABLE == MACRO NAMES 


.840CA a 
.1170 la 88 


SEQ 0136 


- ABS. 111054 000 


ERRORS DETECTED: 0 


DSKZ : CEKBG8.BIN,DSKZ : CEKBGB.LST/CRF /SOL=CEKBGB. SML , CEKBGB.P11 
RUN-TIME: 47 60 5 SECONDS 

RUN-TIME RATIO: 325/114=2.8 

CORE USED: 39K (77 PAGES) 


